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Chapter  1 

Background 


1.1  Introduction 

In  this  report,  we  present  a  method  to  generate  the  exact  coefficients  necessary  to 
implement  two  families  of  implicit  Chebyshev  methods  for  numerical  integration. 
The  first  family  is  valid  for  systems  of  first-order  ordinary  differential  equations  as 
presented  by  Richardson  and  Panovsky  [7].  The  second  family  is  applied  to  sys¬ 
tems  of  second-order  ordinary  differential  equations  of  a  special  form  as  presented  by 
Panovsky  and  Richardson  [5]. 

Before  we  begin  the  brief  review  of  the  two  families  of  numerical  methods,  we 
address  two  preliminary  topics  related  to  the  implementation  of  these  methods. 

1.1.1  Chebyshev  polynomial  interpolation 

For  the  numerical  methods  discussed  here,  the  interpolation  over  a  particular  interval 
is  accomplished  using  Chebyshev  polynomials.  These  polynomials  are  a  clear  choice 
of  basis  functions  because  of  their  minimax  error  properties  as  well  as  their  excellent 
convergence  characteristics.  As  a  result,  for  a  sample  interval  [x,x  +  h],  the  inter¬ 
polation  points  or  nodes  are  not  evenly  spaced  along  the  x-axis.  However,  they  are 
evenly  spaced  along  the  arc- length  of  a  semi-circle  centered  at  the  interval  midpoint. 
As  an  example,  Figure  1.1  demonstrates  this  by  dividing  the  semi-circle  into  six  equal 
sectors.  Each  angular  position  8j,j  6  Z[0, n]  is  given  as 

Oj  =  - - —7T.  (1.1) 

n 

Considering  the  unit  semi-circle,  the  locations  of  the  nodal  points  inside  the  unit 
interval,  or  unit  intra- nodal  points  £j,  are  given  by 

=  \  (i  +  cos  eg .  (i.2) 

Conveniently,  the  above  expression  also  correctly  includes  the  interval  end  points  for 
j  =  0,n  so  that  €  M[0, 1].  Returning  to  the  interval  [x,x  +  h],  these  intra-nodal 
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Figure  1.1:  Sample  interval  [x,x  +  h]  for  n  =  6. 


points  Xj  are  given  by 


Xj  =  x  +  h£j . 


(1.3) 


For  the  example  given  in  Figure  1.1,  the  upper  limit  of  j  is  n  =  6.  In  a  terminology 
consistent  with  Henrici  [3],  this  upper  bound  n  is  called  the  degree  of  the  selected 
interpolation  method. 


1.1.2  Implicit  methods 

The  implicit  nature  of  these  methods  arises  as  the  result  of  interpolation  mechanism 
used  to  propagate  a  given  numerical  solution  y(x)  to  y(x  +  h).  Obviously,  we  are 
interested  in  y(x  +  h),  i.e.  £  =  1.  However,  to  compute  y(x  +  h),  we  must  have 
information  about  the  values  of  both  the  derivative  and  solution  at  the  at  the  intra- 
nodal  points.  The  fact  that  the  derivatives  are  direct  functions  of  the  solution  gives 
rise  to  the  implicit  nature  of  these  methods. 


1.2  Review  of  Methods 

1.2.1  First-order  differential  equations 

For  the  case  of  a  family  of  implicit  Chebyshev  methods  for  the  numerical  integration 
of  first-order  differential  equations  as  presented  by  Richardson  and  Panovsky  [7],  the 
form  of  the  initial  value  problem  of  dimension  m  is  given  by 

=f(y(x),x),  y(x)|a:o  =y0,  y,feMm,  (1.4) 

with  each  /  G  C'1[0,  b]. 
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The  fundamental  final  result  necessary  to  develop  the  integration  procedure  for  a 
specific  m  is  given  by 


n 

1  %  ^// 

y(x  +  h£j)  =  y(x)  +  - h  2^  akRjk, 

k  =  0 


with  the  summand  terms  defined  as 


ak 


2 

-  f{xj)  cos  kdj, 
Uj  =  o 


(1.5) 


(1.6) 


and 


Rjk 


cos  (k  +  1  )0j  +  (— l)fc  cos  (k  —  1  )6j  +  (— l)k 

2(k  +  1)  2(k  -  1) 

~  (cos  20 j  1) , 

cos  6j  +  1, 


k>  2, 

k  =  1, 
k  =  0. 


(1.7) 


The  local  truncation  error  for  a  given  degree  n  induced  by  the  discrete  approxi¬ 
mation  found  in  Eq.  (1.5)  is  written  en(z),  where 


z  =  x  +  h£, 


(1.8) 


with  £  £  M[0, 1].  For  /(£)  evaluated  at  some  point  /3  £  M[0, 1],  the  error  estimate  is 
given  by 


nhn+3Pn+2f  (z(P)) 

22n(n2  —  l)(n2  —  9)(n  +  1)!  ’ 

6  "  *n+2Dn+1fW))  „  odd 

i22n-ln(n2_4)(n+1)!’  UUUU’ 

where  Dk  f  (z(/3))  represents  the  kth  derivative  of  /  evaluated  at  z(/3). 


(1.9) 


1.2.2  Second-order  differential  equations  of  special  form 

For  the  case  of  a  family  of  implicit  Chebyshev  methods  for  the  numerical  integration 
of  second-order  differential  equations,  as  presented  by  Panovsky  and  Richardson  [5], 
the  special  form  of  the  initial  value  problem  of  dimension  m  is  given  by 

^  =f(y(x),x),  y(zOU0  =  yo?  y/(*)U0  =  yoi  y,y',feKm,  (l.io) 

with  each  /  £  C'2[0,6].  Examining  Eq.  (1.10),  we  quickly  notice  that  no  first  deriva¬ 
tives  appear  in  the  arguments  of  f ,  thus  constituting  the  special  form.  Panovsky  and 
Richardson  [5]  provide  a  discussion  for  the  range  of  applications  of  this  problem  form. 
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The  fundamental  final  result  necessary  to  develop  the  integration  procedure  for  a 
specific  m  is  given  by 


y{x  +  h£j)  =  2 y(x)  -  y(x  -  h£j)  +  jh2  ^  (a£  +  ak  )Sjk, 
with  the  summand  terms 


(1.11) 


k  =  0 


n 

2  — // 


~Y1  f  (xf)  cos  k6j, 


(1.12) 


i  =  o 


where  xf  =  x  ±  /i£  ,  and 


Sjk  =  < 


cos  ( k  +  2)  0j  cos  (k  —  2)  9j 


cos  k0n 


4(k  +  l)(k  +  2)  4(k-l){k-2)  2(k  +  l){k-l) 

(— l)fc+1  cos  9j  (— l)fc+1 


+ 


(ife  +  l)(fc-l)  (k  +  2)(k-2) 
(—9  —  16  cos  6j  —  8  cos  29 j  +  cos  49 j)  . 

(8  —  9  cos  9j  +  cos  39 j ) , 


1 

48 
1 

24 

-  (3  —  4  cos  9j  +  cos  29 j) , 


k  >  3+, 

k  =  2,  (1-13) 
k  =  1, 
k  =  0. 


As  before,  the  local  truncation  error  for  a  given  degree  n  incurred  by  the  discrete 
approximation  found  in  Eq.  (1.11)  is  written  en(z)  for  z  given  by  Eq.  (1.8)  with 
£  £  M[— 1, 1].  Then,  for  /(£)  evaluated  at  some  point  /3  £  M[—  1, 1],  the  error  estimate 
is  written  as 

hn+3 


e"(")  ~  22n_1n3(n  +  1)! 
The  above  error  estimate  presumes  that 


Dn+if{zm\. 


(1.14) 


Dn+1f+(a) |  «  |Hn+1r(7?)|  ~  | Dn+1f((3) 


(1.15) 


for  a,  rj  £  M[— 1, 1]. 

1.2.3  Iteration  procedure 

For  the  family  of  methods  discussed  in  §  1.2.2,  Eq.  (1.11)  indicates  that  intra-nodal 
information  from  the  previous  step  is  required,  viz.  a7  ■  That  information  can  be 
stored  from  the  previous  iteration  and  easily  made  available.  Additionally,  it  indicates 
that  this  family  of  methods  is  not  self-starting.  To  provide  the  necessary  starting 

^For  k  >  3,  S  jk  appearing  here  typographically  corrects  Rjk  given  by  Eq.  (21)  in  Panovsky  and 
Richardson  [5,  p.  39];  cf.  Carpenter  [2,  p.  56]. 


4 


CHAPTER  1.  BACKGROUND 


Algorithm  1.1  Example  continuous  substitution  iteration 
1:  compute  intra-nodal  step  sizes:  hj  <—  xj  —  Xj- \ 

2:  while  x  <  Xf  do 

3:  for  all  j  €  Z[l,  n]  do 

4:  generate  initial  guesses  for  all  yy.  y® 

5:  repeat 

(£) 

6:  compute  a'k 

7:  compute 

8:  until  ||y^  —  y^_1)||  <  e 

9:  end  for 

10:  y(<"l)  <_  yW 

11:  increment  x 

12:  end  while 


information  any  number  of  high- accuracy  methods  may  be  used.  The  fact  that  high- 
accuracy,  fully  explicit  or  predictor-corrector  methods  are  computationally  expensive 
is  of  little  concern  because  it  is  only  required  to  bootstrap  the  process.  Fortunately, 
the  family  of  methods  for  first-order  systems  (§  1.2.1)  is  self-starting,  as  indicated  by 
Eq.  (1.5). 

Despite  their  differences,  both  families  of  methods  still  share  similar  iteration 
schemes  because  derivative  and  solution  values  at  the  forward  intra-nodal  points  must 
be  known.  To  enhance  the  process,  it  is  convenient  to  generate  an  initial  guess  with 
a  simple,  low-order,  fully  explicit  method.  Experimentation  has  shown  that  a  fourth- 
order  Runge-Kutta  scheme  is  sufficient  for  this  task.  Once  the  initial  guesses  have 
been  obtained  for  each  yj,  a  method  termed  iteration  by  continuous  substitution 1  is 
used  to  until  the  difference  between  two  successive  yj  is  sufficiently  small.  An  example 
algorithm  for  this  is  given  in  Algorithm  1.1.  This  sample  algorithm  is  by  no  means 
optimized  for  speed  of  execution,  but  rather  illustrative  of  the  procedure  necessary 
to  implement  the  families  of  methods. 

1.2.4  Method  degree  recommendations 

For  second-order  systems  of  special  form,  the  local  truncation  error  analysis  performed 
in  Panovsky  and  Richardson  [5]  does  not  explicitly  state  any  recommendations  for 
choice  of  method  degree  with  respect  to  computational  efficiency.  However,  the  anal¬ 
ysis  presented  in  Richardson  and  Panovsky  [7]  for  first-order  systems  clearly  favors 
even  method  degrees  since  for  a  given  degree  n  even,  the  truncation  errors  for  n  and 
n+1  are  very  similar.  This  is  clearly  seen  from  Eq.  (1.9). 

1See  Panovsky  and  Richardson  [5]  for  additional  detail. 
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1.3  Goals 

Richardson  et  al.  [8]  provided  several  significant  performance  improvements  in  the 
implementation  of  the  family  of  first-order  methods.  Further  significant  performance 
improvement  for  both  families  could  be  obtained  by  expanding  the  coefficients  ak 
and  directly  into  Eqs.  (1.5)  and  (1.11),  respectively.  This  would  eliminate  their 
explicit  computation  in  the  inner-most  iteration  of  Algorithm  1.1  and  considerably 
speed  the  process.  However,  as  Panovsky  and  Richardson  [5,  p.  41]  noted,  “The 
explicit  replacement  of  [these  coefficients]  . . .  would  require  considerable  algebraic 
manipulations  even  for  modest  values  of  n.”  Indeed,  considerable  effort  would  be 
required  to  perform  this  algebra  by  hand  for  a  single  interesting  value  of  n.  Fortu¬ 
nately,  symbolic  algebra  systems  allow  us  to  perform  algebraic  operations  that  would 
ordinarily  be  most  unproductive  if  performed  by  hand.  To  accomplish  this  task,  we 
develop  a  package  using  the  Mathematica®  symbolic  algebra  system. 

In  addition  to  automatically  performing  large  quantities  of  tedious  algebra,  there 
are  additional  benefits  to  such  an  approach.  One  obvious  benefit  is  that  the  required 
coefficients  can  be  computed  exactly  as  algebraic  numbers2.  Knowing  the  coefficients 
exactly  will  ensure  that  they  can  be  computed  externally  to  any  accuracy  desired  for 
a  given  precision. 

In  terms  of  the  explicit  forms  for  first-  and  second-order  methods,  we  want  to 
write  Eqs.  (1.5)  and  (1.11)  as 

n 

y(x  +  h£j)  =  y(x)  +  h^2wjk  f(xk),  (1.16) 

k  =  o 


and 


y(x  +  hfij)  =  2 y(x)  -  y(x  -  h^)  +  h2  ^  wjk  (f(x%)  +  f{xk  ))  ,  (1.17) 

k  =  0 

respectively.  In  each  of  the  about  equations,  we  seek  to  compute  the  Wjk  exactly. 


2See  Wolfram  [10,  p.  1070]. 
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Chapter  2 

Computing  the  Exact 
Coefficients 

2.1  Introduction 

As  mentioned  in  the  previous  chapter,  Mathematica®  was  selected  to  perform  as 
the  symbolic  algebra  engine.  It  is  certainly  not  the  only  symbolic  algebra  system  that 
could  have  been  selected.  Many  other  systems  exist  that  could  perform  this  task. 

In  the  following  sections,  we  develop  and  describe  the  Mathematica®  code 
necessary  to  compute  the  exact  coefficients  for  both  families  of  implicit  methods  pre¬ 
viously  discussed.  To  better  document  the  program  development,  noweb1  by  Ramsey 
[6]  was  used.  The  coefficients  themselves  appear  in  appendices  A-C.  For  notational 
convenience,  all  derivative  evaluations  are  written  f(x)  rather  than  the  fully  explicit 
f(y(x),x).  Thus  y(x)  is  always  an  implicit  argument  when  writing  f(x). 

We  begin  by  considering  the  mathematics  from  Chapter  1. 

2.2  Mathematical  definitions 

The  common  mathematics  from  Chapter  1  are 

7  ( mathematical  definitions:  common  7}=  (24) 

(define  interval  related  quantities  8a) 

(define  double  prime  summation  8b) 

(define  finite- sum  Chebyshev  approximation  coefficients  8c) 

(define  abstracted  summation  evaluator  8d) 

(define  generic  method  generator  for  given  degree  9a) 

with  family  specific  mathematics  defined  in  code  chunks  that  follow. 

1The  noweb  system  is  a  considerably  simplified  implementation  of  the  literate  programming  con¬ 
cept  presented  by  Knuth  [4]. 
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2.2.1  Interval  related  quantities 

From  §  1.1.1,  the  location  of  the  points  of  interest  on  the  unit  interval  from  Eqs.  (1.1) 
and  (1.3)  become 

(define  interval  related  quantities  8a)  =  (7) 

theta [  j_Integer,  n_Integer  ]  :=  (n-j)  Pi  /  n; 

xi [j_Integer ,  n_Integer]  :=  (  1  +  Cos [  theta  [j,n]  ]  )  /  2; 


2.2.2  Double  prime  summation 

(define  double  prime  summation  8b)  =  (7) 

sumpp [  elist_List  ]  := 

Module  [  O, 

Return[  Plus  @@  MapAt[#/2&,  elist,  {  {1},  {-1}  }]  ]; 

]; 


2.2.3  Finite-sum  Chebyshev  approximation  coefRcients 

Eqs.  (1.6)  and  (1.12)  provide  the  finite-sum  approximation  Chebyshev  coefficients 
for  each  family.  Since  the  from  §  1.2.1  are  the  same  as  the  at  from  §  1.2.2,  the 
definition  of  af  is  used  to  provide  a*,. 

(define  finite-sum  Chebyshev  approximation  coefficients  8c)  =  (7) 

ak[  k_Integer  /;  k  >=  0,  s_Integer  /;  s  ===  +1 1  I  s  ===  -1, 
n_Integer  /;  n  >  0  ]  := 

Module [  {elist,  j}, 

elist  =  Tablet  f  [x  +  Sign[s]  h  xi[j,n]  ]  Cos  [k  theta  [j,n]  ], 

{j ,0,n>  ] ; 

Return [  (2/n)  sumpp [elist]  ]; 

]; 


The  second  argument  to  ak[.  .  .] ,  i.e.  s,  represents  the  sign  required  to  compute 
each  xj.  As  the  condition  indicates,  s  must  be  given  such  that  s  =  ±1. 

2.2.4  Abstracted  summation  evaluator 

(define  abstracted  summation  evaluator  8d)=  (7) 

summation [  j_Integer  /;  j  >0,  n_Integer  /;  n  >  0  ]  := 

Module [{} , 

pickupGenOptions  [  Equations,  opts  ]; 

Return [  sumpp  [  sumtable[j,  n]  ]  ] ; 
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]; 

For  the  summations  appearing  in  Eqs.  (1.5)  and  (1.11),  each  of  the  terms  are 
generated  and  placed  in  a  Table  with  the  first  and  last  entries  of  the  list  halved 
(sumpp),  as  required,  and  then  added  together.  The  sumtable  and  leading  multipliers 
of  the  summations  are  handled  in  family  specific  code  chunks  that  follow. 

2.2.5  Generic  method  generator  for  specific  degree 

For  both  families  of  methods,  the  method  for  a  particular  degree  is  first  generated  in 
raw  form,  and  will  require  considerable  simplification. 

9a  (define  generic  method  generator  for  given  degree  9a)  =  (7) 

GenEqsRaw[  n_Integer  /;  n  >  0  &&  EvenQ [n] ,  opts _ Rule  ]  := 

Module  [  {j}, 

pickupGenOptions  [  Equations,  opts  ]; 

Return  [  Tablet  {  y  [  x  +  h  xi  [j  ,n]  ], 
leadingterms [j ,n] , 
summation  [j ,n]  }, 

{j ,n}  ]  ] ; 

]; 


In  the  table  returned  from  GenEqsRaw,  the  first  list  element  of  each  table  entry  is 
the  intra-nodal  point  of  interest.  The  second  and  third  elements  of  the  list  contain  the 
corresponding  leading  terms  and  summation  information,  respectively,  from  Eqs  (1.5) 
and  (1.11).  This  information  is  family  specific. 

2.2.6  First-order  system  specifics 

Here,  we  address  the  family  specific  mathematics  from  §  1.2.1. 

9b  ( mathematical  definitions:  0(1)  9b)  =  (24b)  10a  > 

R[  j_Integer  /;  j  >0,  k_Integer  /;  k  >=  0, 
n_Integer  /;  n  >  0  ]  := 

Module  [  -[tj]-, 
t  j=theta[j  ,n]  ; 

Which [ 
k  ==  0, 

(Cos  [tj]  +  1) , 
k  ==  1, 

(Cos [2  tj]  -  1)  /  4, 

True,  (*  k  >=  2  *) 

(  (Cos [  (k+l)tj  ]  +  (-l)-k)  /  (k+1)  - 
(Cos  [  (k-l)tj  ]  +  (-1) ~k)  /  (k-1)  )  /  2 
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] 

]; 

The  above  chunk  provides  Rjk  from  Eq.  (1.7). 

10a  ( mathematical  definitions:  0(1)  9b}+=  (24b)  <9b  10b  > 

sumcoef f icient  =  {h,  2 }; 


sumcoef  f  icient  defines  the  leading  multiplier  of  the  summation  of  Eq.  (1.5). 

10b  ( mathematical  definitions:  0(1)  9b}+=  (24b)  <10a  10ct> 

leadingterms [  j_Integer,  n_Integer  ]  :=  (y[x]); 

leadingterms  represents  the  non-summation  terms  in  the  right  hand  side  of 
Eq.  (1.5). 

10c  ( mathematical  definitions:  0(1)  9b)+=  (24b)  <l0b 

sumtable [  j_Integer  /;  j  >0,  n_Integer  /;  n  >  0  ]  := 

Tablet  ak[k,+l,n]  R[j,k,n],  {k,0,n}  ]; 


Lastly,  sumtable  provides  the  summand  information  for  Eq.  (1.5). 

2.2.7  Second-order  special  form  system  specifics 

Here,  we  address  the  family  specific  mathematics  from  §  1.2.2. 

lOd  ( mathematical  definitions:  0(2)s  10d)=  (24c)  lla> 

S[  j_Integer  /;  j  >0,  k_Integer  /;  k  >=  0, 
n_Integer  /;  n  >  0  ]  := 

Module  [  {tj)-, 
t  j=theta[j  ,n]  ; 

Which [ 
k  ==  0, 

1/4 (  3  +  4  Cos  [t j]  +  Cos  [2  tj]  ), 
k  ==  1, 

l/24(  -8-9  Cos  [t j]  +  Cos  [3  tj]), 
k  ==  2, 

1/48 (  -9  -  16  Cos  [t j]  -  8  Cos  [2  tj]  +  Cos [4  tj]), 

True,  (*  k  >  2  *) 

Cost  (k+2)t j  ]  /  (  4(k+l) (k+2)  )  + 

Cost  (k-2)tj  ]  /  (  4 (k-1) (k-2)  )  - 

(Cos[  k  tj  ]  +2  Cos[  k  Pi  ]  Cos [  t j  ] )  /  (  2(k-l)(k+l)  )  - 
Cost  k  Pi]  /  (  (k-2) (k+2)  ) 

] 

]; 
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The  above  chunk  defines  Sjk  from  Eq.  (1.13). 

11a  (mathematical  definitions:  0(2)s  10d)+=  (24c)  <10d  llb> 

sumcoef f icient  =  {h"2,  4}; 

sumcoef  f  icient  provides  the  leading  multiplier  of  the  summation  of  Eq.  (1.11). 

lib  (mathematical  definitions:  0(2)s  10d)+=  (24c)  dla  llc> 

leadingterms [  j_Integer,  n_Integer  /;  n  >  0  ]  := 

(2  y [x]  -  y [x  -  1/2  (l+Cos[(n-j)  Pi/n] )  h  ]); 

leadingterms  represents  the  non-summation  terms  in  the  right  hand  side  of 
Eq.  (1.11). 

11c  (mathematical  definitions:  0(2) s  10d)+=  (24c)  <llb 

sumtable [  j_Integer  /;  j  >0,  n_Integer  /;  n  >  0  ]  := 

Tablet  (ak  [k,+l  ,n]  +ak  [k, -1  ,n] )  S[j,k,n],  -[k,0,n}-  ]; 

Lastly,  sumtable  computes  the  summand  information  for  Eq.  (1.11). 

2.3  Simplification  engine 

Equations  is  the  publicly  exported  function  that  users  invoke  to  obtain  the  method  of 
degree  n  for  a  given  family.  This  function  does  not  generate  the  raw  equations  directly, 
GenEqsRaw  performs  that  task.  However,  it  does  perform  the  specific  simplifications 
necessary  to  obtain  the  most  compact  form  of  a  method. 

lid  (simplification  engine:  common:head  lld}=  (24) 

Equations  [  n_Integer  /;  n  >  0  &&  EvenQ  [n] ,  opts _ Rule  ]  :  = 

(state  module  decls  and  process  user  opts  lie) 

(generate  raw  degree  n  equations  12a) 

(apply  g  :  cos  nir/m  A  or  apply  N  12b) 

(replace  numeric  step  sizes  in  function  args  with  symbols  12c) 

(fully  simplify  expressions  to  get  single  weight  for  each  f  14c) 

The  additional  argument  predicate  EvenQ  attached  to  n  ensures  that  only  even 
degree  methods  will  be  generated  as  recommended  in  §  1.2.4.  For  convenience,  meth¬ 
ods  for  second-order  systems  of  special  form  are  also  so  constrained.  However,  simply 
removing  the  predicate  here  and  in  GenEqsRaw  will  permit  generation  of  methods  of 
odd  degree. 

lie  (state  module  decls  and  process  user  opts  lle)=  (lid) 

Module  [  {j ,  isExpandFailed=False ,  creplist=-Q ,  flist,  hlist, 
hrlist,  frlist,  tmp,  den,  coef ,  result}, 
pickupGenOptions  [  Equations,  opts  ]; 


11 


CHAPTER  2.  COMPUTING  THE  EXACT  COEFFICIENTS 


12a  ( generate  raw  degree  n  equations  12a)  =  (lid) 

Print  [  "n  =  ",  n,  " : ; 

Print  [  "  Generating  equations."]; 
eqs  =  GenEqsRaw[  n,  opts  ]  ; 

12b  (apply  g  :  cosnn/m  i— >  A  or  apply  N  12b)=  (lid) 

If  [  exactp  ==  True, 

Print  [  "  Expanding  Cos [n  Pi  /  m]  terms."]; 
creplist  =  CosRepList [  eqs  ]  ; 

If [  Not [  IsDesiredForm [  creplist  ]  ]  , 

Print ["  . . .expansion  failed."] ; 

$MaxExtraPrecision  +=  50; 
isExpandFailed  =  True; 

];, 

(*else*) 

Print [  "  Converting  to  numerical  coefficients,  prec  =  ",prec]; 
eqs  =  Simplify [  N[  eqs,  prec  ]  ]; 

J; 

If  the  replacement  fails,  the  boolean  isExpandFailed  is  set  to  True.  Failure  is 
measured  against  IsDesiredForm  which  requires  that  the  expressions  be  free  of  Root, 
Complex,  and  Power  [— 1 ,  _]  objects. 

12c  (replace  numeric  stepsizes  in  function  args  with  symbols  12c)=  (lid) 

(extract  unique  function  calls  12d) 

(build  replacement  rule  for  forward  unit  intra-nodal  points  12e) 

(handle  replacement  for  back  intra-nodal  points  13a) 

(perform  stepsize  replacement  13b) 

(check  if  A  numbers  are  irreducible  Root  objects  13c) 

12d  (extract  unique  function  calls  12d)=  (12c) 

Print  [  "  Simplifying  intra-nodal  stepsizes."]; 
flist  =  Cases  [  eqs,  _  [_] ,  Infinity]  //  Union; 

12e  (build  replacement  rule  for  forward  unit  intra-nodal  points  12e)=  (12c) 

hlist  =  Tablet  xi[j,n],  {j,l,n-l}]  h; 

hrlist  =  Tablet  hlist ttj]]  ->  MakeSymth, j] ,  {j .Length thlist] }  ] 

//  Sort t  #,  Greater t  Leaf Count t#l] ,  Leaf Count t#2]  ]&  ]&; 
frlist  =  flist  //  ExpandAll; 

The  Sort  applied  to  hrlist  uses  Leaf  Count  to  provide  a  sort  based  on  expression 
complexity.  The  purpose  is  to  move  the  more  complex  expressions  to  the  head  of  the 
list,  so  that  less  complex  expressions  are  not  incorrectly  substituted  into  portions  of 
the  more  complex  expressions.  For  example,  for  the  two  rules  x3->a,  x4->a+b},  the 
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rule  for  x4  must  be  executed  first  to  avoid  the  faulty  execution  of  rule  x3  resulting  in 
incorrect  expressions,  viz.  x3+b  rather  than  simply  x4. 

13a  (handle  replacement  for  hack  intra-nodal  points  13a) =  (12c) 

For[  j  =  1,  j  <=  Length [hrlist] ,  j++, 

frlist  =  frlist  //.  ExpandAll [{  hrlist[[j]], 

Rule  @0  (-#&  /@  List  @@  hrlist  [[j]])  }] 

]; 

The  purpose  of  the  -#&  rule  is  to  also  replace  the  any  back  intra-nodal  points  with 
negative  version  of  the  intra-nodal  stepsize,  i.e.  —hj.  This  does  not  affect  the  family 
of  first-order  methods,  since  back  points  will  not  exist  in  the  function  arguments,  so 
it  is  safe  to  apply  in  both  cases. 

13b  ( perform  stepsize  replacement  13b) =  (12c) 

hrlist  [  [All , 1] ]  =  hrlist [  [All , 1] ]  //  Collect  [#,  h,  Simplify]  &; 
frlist  =  Thread [  Rule [f list,  frlist]  ]; 
eqs  =  (eqs  //.  frlist); 

If  the  resulting  expression  does  not  meet  the  desired  form,  e.g.  contains  Root 
objects  because  the  resulting  polynomial  equations  are  not  reducible  to  nested  square 
roots,  a  different  method  of  labeling  the  Root  objects  is  invoked. 

13c  ( check  if  A  numbers  are  irreducible  Root  objects  13c)  =  (12c) 

If  [  isExpandFailed, 

(grab  all  Cos  occurrences  13d) 

(compute  maximally  reduced  Root  objects  13e) 

(calculate  unique  numerical  values  with  extra  precision  13f) 

(construct  replacement  rule  for  (numerically)  unique  Root  objects  14a) 

]; 

(apply  Root  replacement  rule  14b) 

13d  (grab  all  Cos  occurrences  13d)  =  (13c) 

Print  [  "  ...  labeling/replacing  Root []  objects."]; 

coslist  =  Cases [  eqs,  Cos  [_] ,  Infinity]  //  Union; 

13e  (compute  maximally  reduced  Root  objects  13e)  =  (13c) 

rootlist  =  coslist  //  TrigToExp  //  RootReduce  //  FullSimplify ; 

13f  (calculate  unique  numerical  values  with  extra  precision  13f)=  (13c) 

nlist  =  Abs [N [rootlist ,  $MaxExtraPrecision] ] 

//  Union [#, 

SameTest->(Abs  [#l-#2] <10~ (-$MaxExtraPrecision+l)&)]  & 

The  SameTest  used  for  the  Union  attempts  to  provide  sufficient  precision  to  re¬ 
solve  roots  that  may  be  close  together.  This  is  most  likely  not  necessary  since  the 
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Chebyshev  intra-nodal  points  should  be  sufficiently  different  to  avoid  this  problem 
for  most  degrees  n  of  interest.  However,  for  very  large  n,  intra-nodal  clustering  near 
the  interval  end  points  may  cause  difficulty  depending  on  the  required  floating-point 
precision. 

An  interesting  side  effect  of  this  SameTest  is  that  it  accounts  for  a  slight  difference 
in  the  way  N  is  applied  between  Mathematica®  versions  4.0  and  4.1. 

14a  ( construct  replacement  rule  for  (numerically)  unique  Root  objects  14a)  =  (13c) 

clist  =  Tablet  MakeSym[c,j] ,  {j , Length [nlist] }  ]; 

nclist  =  Thread [Rule [nlist , clist] ] ; 

nclist  =  {Table [  Rule  @@  (-#&  /@  List@@nclist [ [k] ] ) , 

{k, Length [nclist] }] , 
nclist}  //Flatten; 
relist  =  Thread [Rule [rootlist , 

(N  [rootlist , $MaxExtraPrecision] / .nclist)]  ] 
creplist  =  Thread [  Rule [  coslist,  (rootlist// . relist)  ]  ]; 

The  meaning  of  the  above  code  chunk  may  be  difficult  to  perceive,  initially.  Its 
goal  is  to  determine  which  Root  objects  are  unique  (numerically),  symbolically  la¬ 
bel  them  (cl,c2,...),  replace  repeated  Root  objects  with  the  appropriate  label,  then 
replace  all  RootReduce’d  Cos  expressions  with  the  appropriate  symbol. 

The  resulting  replacement  rules  are  only  applied  if  creplist  is  not  empty. 

14b  ( apply  Root  replacement  rule  14b}=  (13c) 

If  [  creplist  !=  {}, 

eqs  =  eqs  //.  creplist; 

]; 

14c  ( fully  simplify  expressions  to  get  single  weight  for  each  f  14c)  =  (lid) 

Print  [  "  Factoring  common  terms  from  integral  approximation."]; 
WriteString [  $0utput,  "  j  =  "] ; 

For [  j  =  1,  j  <=  n,  j++, 

WriteString [  $0utput,  j,  ",  "] ; 

tl  =  (eqs[[j,3]]  /  sumcoef f icient  [  [2] ]  )  //  ExpandAll 
//  Collect [  #,  f [_] ,  Simplify  ]& 

//  Cancel  //  Together; 
den  =  tl  //  Denominator; 
coef  =  sumcoef f icient  [  [1] ]  /  den; 
eqs  [  [  j ,3]]  =  coef; 
tl  =  tl  //  Numerator 

//  Collect [#,f  [_] , 

FullSimplif y [# ,ExcludedForms->{Sqrt [_] }]&]&; 

t2  =  Cases  [  tl,  f  [_] ,  Infinity  ]  //  Union; 

Assert  [  t2[[l]]  ==  f [x] ,  "PRC::expr  missing  f [b] "  ]; 
t3  =  Coefficient [  tl,  t2  ]  ; 
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t4  =  Thread[  List[t3,t2]  ]; 

For  the  above  chunk,  the  denominator  of  the  summation  multiplier  for  each  equa¬ 
tion  is  incorporated  into  the  coefficients  and  a  common  denominator  factored.  The 
combined  summation  multiplier  is  then  incorporated  into  the  output  list.  In  finding 
a  common  denominator,  care  is  taken  not  to  disturb  any  Sqrt  objects  appearing. 

The  family  specific  code  for  first-order  methods  is  quite  brief.  At  this  stage  the 
simplification  is  complete.  The  only  remaining  task  is  to  rearrange  the  list  slightly 
so  that  the  coefficients  appear  from  left  to  right  in  increasing  order  of  intra-nodal 
location. 

15a  (simplification  engine:  0(1)  15a)  =  (24b) 

tl  =  Prepend[  RotateLeft  [  Rest [t4] ,  1],  First [t4]  ]; 

The  family  specific  code  for  second-order  special  form  methods  is  not  as  brief  as 
for  the  first-order  methods.  These  expressions  contain  both  forward  and  back  intra- 
nodal  location  information.  Given  the  symmetry  in  the  problem,  the  summand  of 
Eq.  (1.11)  can  be  written  wj  (f(x  +  hfi)  +  f(x  —  hj)).  This  is  accomplished  in  the 
For  block  below. 

Once  the  desired  summand  form  is  achieved,  the  expressions  still  require  rear¬ 
rangement  for  viewing  convenience.  This  is  handled  in  a  fashion  similar  to  the  first- 
order  methods.  However,  there  is  one  notable  difference.  For  the  case  of  second-order 
special  form  methods,  it  is  trivial  to  show  that  the  nth  equation  of  degree  n  is  always 
a  corrector,  thus  lacking  an  f(x  +  h)  +  f(x  —  h)  term.  As  a  consistency  check  and  for 
viewing  convenience,  this  is  explicitly  stated  in  the  output  equations. 

15b  ( simplification  engine:  0(2)s  15b)=  (24c) 

t5  =  Rest  [  t4  ]  //  Partition[#,2]&; 

For[  k  =  1;  m  =  Length [t 5] ;  tl  =  {},  k  <=  m,  k++, 
tmp  =  t5 [ [k] ] ; 

If  [  SameQ [  tmp  [All, 1]  ]> 

AppendTo  [  tl,  -[tmp  [  [1 , 1]  ]  ,  Plus@@tmp [ [All , 2] ] }  ];  , 

(*else*) 

Throw ["PRC : unexpected  intra-nodal  asymmetry."]; 

]; 

]; 

If [  FreeQ  [  tl,  f [x+h]  ], 

PrependTo  [  tl,  First [t4]  ]; 

AppendTo [  tl,  {0,  f [x-h] +f [x+h] }  ];, 

(*else*) 

tl  =  Prepend [  RotateLeft [tl , 1] ,  First [t4]  ]; 

]; 

15c  ( simplification  engine:  common:tail  15c)  =  (24) 

AppendTo  [  eqs[[j]],  tl  ] ; 
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If [  IsDesiredForm [  eqs[[j]]  ]  ===  False, 

WriteString [  $0utput,  "(",j,"x)"  ]; 

] ; 

]; 

hrlist  =  (Reverse  /@  hrlist)  //.  creplist  //  Sort [#,noLettersQ]&; 
hrlist  [  [All , 2] ]  =  FullSimplify  [  Coefficient  [hrlist  [  [All , 2] ] ,  h]  ]  h; 
result  =  {  hrlist,  eqs}; 

If  [  isExpandFailed, 

crlist  =  Thread [  Rule  [  clist,  clist  /.  (Reverse  /@  relist)  ]  ]; 
AppendTo[  result,  crlist  ]; 

]; 

Print ["\n  Done."]; 

Return  [  result  ] ; 

]; 


2.4  Utility  function  definitions 

16a  (utility  functions  16a)  =  (24) 

( convenient  assertion  device  16b) 

(construct  compound  symbols  from  String+Number  combinations  17a) 
(predicate  to  validate  desired  expression  form  17b) 

(predicate  to  sort  String  by  numeric  values  appearing  17c) 

(complexity  function  that  provides  a  weighted  leaf  count  18a) 

(function  that  constructs  and  applies  g  :  coswr/m  i— >  A  18b) 

(function  to  handle  opening  output  files  of  form  n[0-9]+-[ab]  .  tex  19a) 


2.4.1  Assertion  device 

16b  (convenient  assertion  device  16b)  =  (16a) 

Assert [  expr_,  excpt_:Null  ]  := 

Block [{} , 

Assert :: indet  =  "Indeterminate  boolean  expression  ‘1‘  encountered."; 
Assert :: failed  =  "Assertion  ‘1‘  failed."; 

If  [  Evaluate [expr] , 

Null,  (*  True,  do  nothing  *) 
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Message [Assert :: failed,  expr] ;  (*  false  =>  fail  *) 

Throw [excpt] , 

Message [Assert :: failed,  expr];  (*  other  =>  fail  differently  *) 
Message [Assert : : indet ,  expr] ; 

Throw [excpt] ; 

]; 

]; 

SetAttributes [Assert ,  HoldFirst]  ; 


2.4.2  Constructing  arbitrary  symbol  tags 

17a  ( construct  compound  symbols  from  String+Number  combinations  17a)  =  (16a) 

MakeSym[q_,  p_Integer]  := 

Block [  {res}, 

res  =  MakeExpression [  ToString[q]  <>  ToString[p] ,  StandardForm] ; 
Return [  res  //  ReleaseHold  ] ; 

]; 


2.4.3  Expression  form  predicate 

The  predicate  IsDesiredForm  determines  if  an  input  expression  is  free  from  complex 
numbers,  Root  objects,  and  terms  like  (— l)p.  A  result  of  False  indicates  that  the 
expression  is  not  of  the  desired  form. 

17b  (predicate  to  validate  desired  expression  form  17b}=  (16a) 

IsDesiredForm [  expr_  ]  :=  (  FreeQ[expr,  Power[-l,_],  Infinity]  && 

FreeQ[expr,  Complex [_,_] ,  Infinity  ]  && 
FreeQ[expr,  Root  [ _ ,_] ,  Infinity  ]  ); 


2.4.4  Special  sorting  predicate 

When  sorting  certain  expressions,  it  is  preferable  to  avoid  lexical  sorting  and  instead 
ask  that  the  predicate  use  numerical  ordering.  The  predicate  noLettersQ  does  just 
that.  While  the  code  may  look  rather  messy,  the  fundamental  idea  is  straight  forward. 
When  comparing  two  expressions,  the  predicate  first  ensures  both  are  strings,  then 
converts  both  arguments  to  character  lists  and  deletes  any  element  matching  LetterQ. 
From  there,  the  remaining  digits  are  rejoined  as  strings  and  manually  converted  to 
expressions  that  are  subject  to  OrderQ.  Of  course,  noLettersQ  is  expecting  to  sort 
only  on  the  right  hand  sides  of  rules  of  the  form  xl->l  rather  than  single  entries. 
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17c  ( predicate  to  sort  String  by  numeric  values  appearing  17c)  =  (16a) 

noLettersQ  =  OrderedQ  [ToExpression  [( (StringJoin@@#&) /@#&) [ 

( (DeleteCases [#, _?LetterQ] &) /@#&) [ 

(Characters/®##;)  [ToString/® ((#[[!]]&)  /@{##}) ]  ]]]]&; 


2.4.5  Weighted  leaf  count 

The  Mathematica®  FullSimplify  function  allows  users  to  specify  a  complexity 
function  to  rank  the  complexity  of  various  expression  forms.  By  default,  forms 
are  ranked  according  to  their  LeafCount.  To  avoid  the  expressions  specified  by 
IsDesiredForm,  their  LeafCount  complexity  is  artificially  increased  by  a  factor  of 
lO1000.  This  approach  is  a  brute-force  application  of  a  penalty  method  to  direct  the 
simplification  process.  It  is  neither  elegant  nor  efficient,  but  accomplishes  the  task 
in  a  reasonable  time.  To  keep  efficiency  issues  to  a  minimum,  it  is  only  used  in  the 
simplification  of  expressions  of  the  form  Cos  [n  Pi/m] . 

18a  ( complexity  function  that  provides  a  weighted  leaf  count  18a)  =  (16a) 

WLC [iexpr_]  := 

Module [{fudge  =  10~1000,  lc  =  Leaf Count [iexpr] } , 

If [  Not [  IsDesiredForm  [  iexpr  ]  ], 
lc  *=  fudge  ]  ; 

Return  [  lc  ]  ; 

]; 


2.4.6  Mapping  cos  rm /rn  to  A 

CosRepList  attempts  to  transform  expressions  of  the  form  Cos  [n  Pi/m]  to  algebraic 
numbers,  specifically  nested  square  roots,  within  a  given  expression  list. 

18b  ( function  that  constructs  and  applies  g  :  cosn7r/m  i— >  A  18b)=  (16a) 

CosRepList  [  eqs_  ]  :  = 

Module  [  {cosines,  rlist={}]-. 

If [  MemberQ [  eqs,  Cos [_] ,  Infinity  ], 

cosines  =  Cases [  eqs,  Cos  [_] ,  Infinity  ]  //  Union; 
rlist  =  (#  ->  FullSimplify  [TrigToExp  [#] , 

ComplexityFunction->WLC] )  &  /@  cosines 


]; 

Return  [  rlist  ] ; 

]; 
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2.4.7  Opening  specially  named  files 

19a  ( function  to  handle  opening  output  files  of  form  n[0-9]+-[ab]  .tex  19a)  =  (16a) 

myOpenWrite [  str_String,  opts _ Rule  ]  := 

Module [  {filename}, 

pickupTeXOptions [  EquationsLaTeXed,  opts  ]; 

If [  StringQ [of n] , 

filename  =  ofn  <>  str  <>  ".tex"; 
os  =  OpenWrite  [filename] ; 

If  [  os  ==  $Failed, 

Throw  [{myOpenWrite , OpenWrite .filename , $Failed}]  ]  ; 

Return  [  os  ] , 

(*else*) 

Throw  [{myOpenWrite, StringQ [] ,$Failed}]  ; 

]; 

]; 


2.5  I^TgX  output  functions 

Producing  FTgX  output  of  the  methods  generated  here  requires  considerably  more 
processing  than  the  standard  TeXForm  command.  The  following  code  chunks  address 
this  need. 

Essentially  two  options  are  available  for  the  FTj^X  output:  tabular  or  standard 
equation  form.  For  the  tabular  form,  tables  of  coefficients  with  appropriate  table 
headings,  captions  and  labels  are  produced.  To  account  for  the  possibility  of  having 
tables  that  may  span  multiple  pages,  the  longtable  package  is  used  for  every  table. 
For  the  case  of  standard  equation  form,  constants  like  Root  objects  and  intra-nodal 
stepsizes  are  placed  in  standard  amsmath  align  environments.  In  both  output  forms, 
the  breqn  package2  is  required  to  automatically  and  semi-intelligently  break  multi- 
line  expressions.  To  use  the  package,  insert 

\usepackage [cmbase] {f lexisym} 

\usepackage{breqn} 

\setkeys{breqn}{compact} 

into  the  preamble  of  your  Flj^X  wrapper.  Additionally,  for  tabular  output,  the 
command  \mx  must  be  defined  with  the  form 

\providecommand{\mx} [1] {\begin{dmath*} [style={\small}] #l\end{dmath*}} 

for  the  output  to  be  successfully  processed. 

2This  package  is  available  via  FTP  from  ftp.ams.org/pub/tex/. 
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19b  (JATfiX  output  functions  19b)  =  (24) 

(function  to  generate  longtable  header  20a) 

(function  to  WTjjfX  simple  lists  of  constants  20b) 

(function  to  JATpfX  material  as  coefficient  tables  2l) 

(function  to  WTjjfX  material  as  standard  equations  23) 

(publicly  exported  l^T^X  output  function  24a) 


2.5.1  longtable  header 

The  table  header  produced  is  for  use  with  the  longtable  package. 

20a  (function  to  generate  longtable  header  20a)  =  (19b) 

TableHead[  caption_String,  shortcaption_String,  head_String  ] 
StringJoin [ 
caption, 

"  \\hline\\hline\n" , 
head, 

"  \\hline\n" , 

"  \\endf irsthead\n" , 

shortcaption,  "  (\emph{continued}-) }\\\\\n" , 

"  \\hline\\hline\n" , 
head, 

"  \\hline\n" , 

"  \\endhead\n" , 

"  \\hline\n" , 

"  \\multicolumn-[2}-[r}-[  (\emph{ continues})  }\\\\\n"  , 

"  \\endf oot\n" , 

"  \\hline\\hline\n" , 

"  Wendlastf  oot\n" 


2.5.2  Intra-nodal  stepsizes  and  Root  objects 

20b  (function  to  JATpfX  simple  lists  of  constants  20b)  =  (19b) 

texconsts  [  eqs_,  tabhead_,  os_,  opts _ Rule  ]  :  = 

Module [  {tmp,  lhs,  rhs,  j,  n,  environ="align" , 
endinput=" " ,  newline="\\\\"} , 
pickupTeXOptions [  EquationsLaTeXed,  opts  ]; 

tmp  =  (List@@#) &  /@  eqs; 
n  =  Length  [  tmp  ]  +  1 ; 

If [  isTabular, 
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environ  =  "longtable"; 
cols  =  "{p{\widtha]-p{\widthb]-]-\n" ; 
endinput  =  "\n\\endinput\n" ; 
newline  =  "Wtabularnewline" ; 

]; 

WriteString [  os,  "\\begin-[" , environ, , 

If [  isTabular,  cols  ], 

If [  isTabular,  tabhead,  "\n"  ]  ]; 

For [  j  =  1,  j  <  n,  j++, 

{lbs,  rhs>  =  tmp [ [j] ] ; 

If [  isTabular  ==  True, 

WriteString [  os,  "  \mx{  ",  j,  "  }  &  \mx{  ",  TeXForm[rhs] , 
"  }",  If [  j  !=  (n-1),  newline,  ""] ,  "\n"] ; , 

(*else*) 

WriteString [  os,  "  " ,TeXForm [lhs] , "  &  =  ",  TeXForm [rhs] , 

If  [  j  !=  (n-1),  newline,  ""],  "\n"] ; 

]; 

]; 

WriteString[  os,  "\\end{" , environ, "}\n" ,  endinput]; 

] ; 


2.5.3  Tables  of  coefficients 

21  (function  to  material  as  coefficient  tables  2l}=  (19b) 

LaTeXEqsTable  [  eqs_,  opts _ Rule  ]  :  = 

Module [{aj ,  b j ,  tmp,  1st,  rhsb,  rhsc,  tabhead,  j,  k,  m, 
n  =  Length [  eqs[[2]]  ]>, 
pickupTeXOptions  [  EquationsLaTeXed,  opts  ]; 
pickupGenOptions  [  Equations,  opts]; 

nlabel[os_,  n_]  :=  WriteStringf  os,  "°/0°/0  n  =  ",  n,  "\n"  ]; 

os  =  myOpenWrite  [  "-a",  opts  ]; 
nlabel[os,  n] ; 

(*  send  out  Root  objects  first  if  appearing  *) 

If [  Length [eqs]  >  2, 
tabhead  =  TableHead[ 

"  \\caption{Unique  \\texttt{Root]-  objects  $n="  <>  ToString[n] 
"$ . \\label{tab : c : "  <> 

ToString  [n]  <>  "»\\\\\n" , 

"  Wcaption []  {Algebraic  numbers,  $n="  <>  ToString [n]  <> 


<> 
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"  Wparbox  [c]  [20pt]  [c]  {Wwidtha}{Wcenterline{$Well$}}  &  "  <> 

"\\parbox[c]  [20pt]  [c]  {Wwidthb}{Wcenterline{$c_{Well}$}}WW\n"  ]  ; 
texconsts[  Sort  [  eqs[[3]],  noLettersQ  ],  tabhead,  os,  opts  ]; 

]; 

(*  send  out  intra-nodal  stepsizes  with  some  fancy  rule  sorting  *) 
tabhead  =  TableHead[ 

"  \\caption{Intra-nodal  points  $h_j$,  $n="<>  ToString[n]  <> 

<>  "\\label{tab:h: "  <>  ToString[n]  <>  "}}WW\n", 

"  Wcaption  []  {Intra-nodal  abscissa  $h_j$,  $n="<> 

ToString [n] <>"$ . " , 

"  Wparbox  [c]  [20pt]  [c]  {Wwidtha}{Wcenterline{$j$}}  &  "  <> 

"Wparbox  [c]  [20pt]  [c]  {Wwidthb}{Wcenterline{$h_j$}}WW\n"  ]  ; 
texconsts[  Sort  [  eqs[[l]],  noLettersQ  ],  tabhead,  os,  opts  ]; 

Close  [os] ; 

os  =  myOpenWrite [  "-b",  opts  ]; 
nlabel[os,  n] ; 

WriteString  [  os ,  " Wbegin{longtable}{p{\widtha}p{\widthb}}\n" , 

TableHead [ 

"  Wcaption-flntegral  approximation  $I_j$  for  $n="  <> 

ToString [n]  <>  "$ .  Wlabel{tab :  I : "  <>  ToString [n]  <> 

"»WW\n" , 

"  Wcaption []  {Integral  approximation  $I_j$,  $n="<> 

ToString  [n] 

"  Wparbox  [c]  [20pt]  [c]  {\\widtha}{"  <> 

" \\centerline{$d_j , w_{jk}$}}  &"  <> 

"Wparbox  [c]  [20pt]  [c]  {\\widthb}{"  <> 

"  Wcenterline{Expression}}WW\n"]  ]  ; 

For [  j  =  1,  j  <=  n,  j++, 

{aj ,  1st}  =  eqs[[2, j ,{3,4}]] ; 

aj  =  Coefficient  [  aj ,  sumcoef f icient  [  [1] ]  ]; 

WriteString [  os,  "  \mx{  d_{",  j  ,"}  }  &  \mx{  ", 

TeXForm [  aj  ],"  }  \\\\",  "\n"  ]; 

For[  k  =  0;  tmp  =  1st  [  [All , 1] ] ;  m  =  Length  [tmp] ,  k  <  m,  k++, 
WriteString [  os,  "  \mx{  w_{",  j,",",k,  "}  }  &  \mx{  ", 

TeXForm[  tmp[[k+l]]  ], 

"  }  Wtabularnewline" ,  "\n"  ]; 

]; 

]; 

WriteString[  os,  "\\end{longtable}\n"] ; 

WriteString[  os,  "\n\\endinput\n"] ; 

Close  [os] ; 
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]; 


2.5.4  List  of  equations 

23  (function  to  lAT^X  material  as  standard  equations  23}=  (19b) 

LaTeXEqsFull  [  eqs_,  opts _ Rule  ]  :  = 

Module  [  {tmp,  lhs,  rhsa,  rhsb,  rhsc,  j,  n}, 
pickupTeXOptions  [  EquationsLaTeXed,  opts  ]; 
pickupGenOptions  [  Equations,  opts  ]; 

os  =  myOpenWrite  [  opts  ]; 

WriteString[  os,  "°/0°/0  n  =  ",  ToString[  Length[  eqs[[2]]  ]  ],  "\n"  ]; 

(*  send  out  Root  objects  first  if  appearing  *) 

If [  Length [eqs]  >  2, 

WriteString [  os,  "  Wbegin{subequations}\n"]  ; 
texconsts[  Sort  [  eqs [[3]],  noLettersQ  ],  os,  opts  ]; 

WriteString [  os,  "\\endfsubequationsf\n\n"] ; 

] ; 

(*  send  out  intra-nodal  stepsizes  with  some  fancy  rule  sorting  *) 
WriteString[  os,  "\\begin-(subequations}-\n"]  ; 
texconsts[  Sort  [  eqs[[l]],  noLettersQ  ],  os,  opts  ]; 

WriteString[  os,  "\\end-(subequations}-\n\n"]  ; 

WriteString[  os,  "\\begin-(subequations}-\n"]  ; 
tmp  =  eqs [ [2]  ]  ; 
n  =  Length [tmp] ; 

For [  j  =  1,  j  <=  n,  j++, 

{lhs,  rhsa}  =  tmp [[j ,{1,2}]] ; 

WriteString [  os,  "  \\begin{dmath}\n"] ; 

WriteString [  os,  "  ",  TeXForm[  lhs  ],  "  &  =  \n"  ]; 

WriteString [  os,  "  ",  TeXForm[  rhsa  ],  "  +  \n"] ; 

{rhsb,  rhsc}  =  tmp [[j ,{3,4}]] ; 

WriteString  [  os,  "  ",  TeXForm[  rhsb  ],  "  \\lef t  [  ", 

TeXForm[  rhsc  ],  "  Wright]  \n" , 

"  \\end{dmath}\n"] ; 

]; 

WriteString[  os,  "\\end{subequations}\n\n\\endinput\n"] ; 

If [  StringQ [of n] ,  Close  [os]  ]; 

] ; 
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2.5.5  RT^X  production  public  export 

24a  (publicly  exported  MTjjfX  output  function  24a)=  (19b) 

LaTeXeqs [  eqs_,  opts _ Rule  ]  := 

Module  [  O, 

pickupTeXOptions [  EquationsLaTeXed,  opts  ]; 

If [  isTabular  ==  True, 

LaTeXEqsTable  [  eqs,  opts  ];, 

(*else*) 

LaTeXEqsFull [  eqs,  opts  ]; 

] ; 

]; 


2.6  Root  code  chunks 

The  code  chunks  contained  in  this  section  represent  the  root  chunks  for  both  families 
of  methods.  In  addition  to  these  root  chunks,  a  sample  driver  script  for  the  family  of 
first-order  methods  is  provided  that  generates  the  methods,  produces  output 

and  stores  the  information  in  appropriate  files. 

2.6.1  Root  chunk  for  family  of  first-order  methods 

24b  (order  1  .mma  24b)  = 

(package  header:  0(1)  26b) 

(public  exports  to  Global'  context:  0(1)  27b) 

(public  exports  to  Global  ‘  context:  common  28b) 

(begin  Private  context  definitions  30a) 

(options  processing  functions  30b) 

(mathematical  definitions:  common  7 ) 

(mathematical  definitions:  0(1)  9b) 

( simplification  engine:  common:head  lid) 

( simplification  engine:  0(1)  15a) 

( simplification  engine:  common:tail  15c) 

(utility  functions  16a) 

(WTjjfX  output  functions  19b) 

(package  tail:  common  30c) 


2.6.2  Root  chunk  for  family  of  special  form  second-order  methods 

24c  (order2s  .mma  24c)  = 

(package  header:  0(2)s  27a) 
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( public  exports  to  Global  ‘  context:  common  28b) 
(begin  Private  context  definitions  30a) 

(public  exports  to  Global'  context:  0(2)s  28a) 

( options  processing  functions  30b) 
(mathematical  definitions:  common  7 ) 
(mathematical  definitions:  0(2)s  lOd) 
(simplification  engine:  common:head  lid) 
(simplification  engine:  0(2) s  15b) 
(simplification  engine:  common:tail  15c) 

(utility  functions  16a) 

(WTjgfX  output  functions  19b) 

(package  tail:  common  30c) 


2.6.3  Sample  driver  script  for  family  of  first-order  methods 

As  a  sample,  the  driver  below  produces  the  methods  for  first-order  differential  equa¬ 
tions  for  even  degrees  2  <  n  <  16.  Once  generated,  the  Mathematica®  form  is 
stored  to  a  file,  then  the  output  is  generated  and  saved  to  file.  Here,  the 

chosen  output  form  is  tables  of  coefficients. 

To  produce  methods  for  second-order  differential  equations,  simply  alter  the  Get 
to  load  the  appropriate  file. 

25a  (generate  .mma  25a)  = 

Get ["orderl .mma"] ; 

For[  n  =  2,  n  <  16,  n+=2, 

tmp  =  Equations  [  n  ]  //  Timing; 

Put [  tmp,  "n"<>ToString [n] <>" .mma"] ; 

Print [  "time  =  ",  tmp[[l]]  ]; 

LaTeXeqs [  tmp[[2]],  OutputFilePref ix  ->  "n"<>ToString [n] , 

TeXTableForm->True  ] ; 

]; 

Print ["Done . "] ; 


2.7  Miscellaneous  chunks 

25b  (file  header:  common:head  25b)  =  (26b  27a) 

(*  $Id:  package. nw,v  1.32  2002/05/29  15:01:50  mitchejw  Exp  $  *) 

(*  :Title:  *) 

(*  : Author:  Jason  Wm.  Mitchell  *) 
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26a  ( file  header:  common:tail  26a)  =  (26b  27a) 

(*  : Context:  Global'  *) 

(*  :Package  Version:  0.1  *) 

(*  : Copyright: 

Copyright  (C)  2001  Jason  Wm.  Mitchell,  All  rights  reserved. 

This  software  is  released  under  the  Perl  Artistic  License, 
see  http : //www . perl . com/pub/a/language/misc/Artistic . html 

This  software  is  OSI  Certified  Open  Source  Software. 

OSI  Certified  is  a  certification  mark  of  the  Open  Source  Initiative. 

*) 

(*  :History:  *) 

(*  : Keywords:  Numerical  integration,  initial-value  problem, 

Chebyshev  methods,  implicit  methods, 
high-order  methods 

*) 

(*  :Mathematica  Version:  3.x,  4.x  *) 

(*  : Limitation(s) :  *) 

(*===================================================================*) 


26b  ( package  header:  0(1)  26b)  =  (24b) 

(file  header:  common:head  25b) 

(*  :Name:  PanvoskyRichardsonOrderl  *) 

(*  : Summary:  PanvoskyRichardsonOrderl  is  a  package  that  generates 

equations  for  the  numerical  integration  of  initial 
value  problems  of  the  form 
y’(x)  =  f (y (x) ; x) ,  y(0)  =  cl, 

using  an  implicit,  intra-step  Chebyshev  interpolation. 

The  equations  are  generated  with  exact  coefficients 
based  on  the  Chebyshev  weights.  The  user  must 
implement  the  (implicit)  iteration  procedure; 
successive  substitution. 


26 


CHAPTER  2.  COMPUTING  THE  EXACT  COEFFICIENTS 


*) 

(*  :Source:  Richardson,  D.  L.  and  Panovsky,  J.,  ‘ ‘A  Family  of 
implicit  Chebyshev  methods  for  the  numerical 
integration  of  first-order  differential  equations’’, 
Proceedings  of  the  AAS/AIAA  Astrodynamics  Specialists 
Conference,  1993. 

*) 

( file  header:  common:tail  26a) 

BeginPackage ["PanvoskyRichardsonOrderl 1 "]  ; 

Clear All ["PanovskyRichardsonOrderl ‘ *"]  ; 

27a  (package  header:  0(2)s  27a)  =  (24c) 

(file  header:  common:head  25b) 

(*  :Name:  PanvoskyRichardson0rder2S  *) 

(*  : Summary:  PanvoskyRichardson0rder2S  is  a  package  that  generates 

equations  for  the  numerical  integration  of  initial 
value  problems  of  the  form 
y”(x)  =  f(y(x);t),  y (0)  =  cl,  y’(0)  =  c2, 
using  an  implicit,  intra-step  Chebyshev  interpolation. 

The  equations  are  generated  with  exact  coefficients 
based  on  the  Chebyshev  weights.  The  user  must 
implement  the  (implicit)  iteration  procedure; 
successive  substitution. 

*) 

(*  :Source:  Panovsky,  J.  and  Richardson,  D.  L.,  ‘‘A  Family  of 
implicit  Chebyshev  methods  for  the  numerical 
integration  of  second-order  differential  equations’’, 

J.  Comp.  Appl .  Math.,  23,  1988,  pp .  35 — 51. 

*) 

(file  header:  common:tail  26a) 

BeginPackage ["PanvoskyRichardson0rder2S ‘ "]  ; 

Clear All ["PanovskyRichardson0rder2S ‘ *"] ; 
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27b  (public  exports  to  Global'  context:  0(1)  27b)  =  (24b) 

PanvoskyRichardsonOrderl : : usage  = 

"PanvoskyRichardsonOrderl  is  a  package  that  generates  equations  " 

"for  the  numerical  integration  of  initial  value  problems  of  the  " 

"form  y’(x)  =  f(y(x);x),  y(0)  =  cl,  using  an  implicit,  " 

"intra-step  Chebyshev  interpolation . \n\n" 

"The  equations  are  generated  with  exact  coefficients  based  on  the  " 
"Chebyshev  weights.  The  user  must  implement  the  (implicit)  " 

"iteration  procedure;  successive  substitution."; 

Equations :: usage  = 

"Equations  [  n,  options...  ]  generates  equations  of  order  n  for  the  " 
"numerical  integration  of  systems  of  equations  of  the  form  " 

"y’(x)  =  f(y(x);x),  y(0)  =  cl."; 

28a  (public  exports  to  Global'  context:  0(2)s  28a)=  (24c) 

PanvoskyRichardson0rder2s : : usage  = 

"PanvoskyRichardson0rder2s  is  a  package  that  generates  equations  " 

"for  the  numerical  integration  of  initial  value  problems  of  the  " 

"form  y’’(x)  =  f(y(x);x),  y(0)  =  cl,  y’ (0)  =  c2,  using  an  implicit,  " 
"intra-step  Chebyshev  interpolation . \n\n" 

"The  equations  are  generated  with  exact  coefficients  based  on  the  " 
"Chebyshev  weights.  The  user  must  implement  the  (implicit)  " 

"iteration  procedure;  successive  substitution."; 

Equations :: usage  = 

"Equations [  n,  options...  ]  generates  equations  of  order  n  for  the  " 
"numerical  integration  of  systems  of  equations  of  the  form  " 

"y’’(x)  =  f(y(x);x),  y(0)  =  cl,  y’ (0)  =  c2."; 

28b  (public  exports  to  Global'  context:  common  28b)  =  (24) 

(function  descriptions:  common  28c) 

(function  Equations  option  descriptions  29a) 

(function  LaTeXeqs  option  descriptions  29b) 

(define  function  options  and  associations  29c) 

28c  (function  descriptions:  common  28c)  =  (28b) 

LaTeXeqs :: usage  = 

"LaTeXeqs [  eqs,  options...  ]  LaTeXs  the  output  of  Equations [n] ." ; 
IsDesiredForm: : usage  = 

"Predicate  to  determine  if  an  expression  is  devoid  of  specific  " 
"algebraic  forms"; 

WLC : : usage  = 

"A  leaf  count  function  weighted  against  Root,  Complex  and  (-1) ~ (n/m) . . . " ; 
MakeSym: : usage  = 
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"Routine  to  create  symbols  like  xl,  from  tag  (x)  and  counter. 
CosRepList :: usage  = 

"Replace  Cos [n  Pi/m]  with  irrational  (algebraic)  numbers."; 
GenEqsRaw: : usage  = 

"generate  raw  equation  pieces"; 


29a  ( function  Equations  option  descriptions  29a)=  (28b) 

IndependentVariable :: usage  = 

"Independent  variable;  default:  x."; 

ConstantsLabel :: usage  = 

"Label  prefix  for  Root  []  object  constants;  default:  c." 
ExactCoef f icients : :usage  = 

"Exact  or  floating  point  coefficients  switch;  default:  True"; 
NumericalPrecision : : usage  = 

"Number  of  decimal  digits  of  precision  for  floating  point  " 
"coefficient  representation;  default:  16."; 


29b  (function  LaTeXeqs  option  descriptions  29b)  =  (28b) 

TeXTableForm: : usage  = 

"Boolean  LaTeX  option  to  put  results  in  a  table  friendly  form; 
"default:  False." 

OutputFilePref ix : :usage  =  " 

Output  filename  prefix;  default:  Null." 

OutputStreamList :: usage  = 

"Stream  list  to  write  output;  overridden  by  OutputFilePref ix; 
"default:  $0utput"; 


The  replacement  rule  IndependentVariable->Global ‘b  may  seem  strange  since 
the  independent  variable  discussed  thus  far  has  been  x.  However,  Mathematica® 
relies  on  a  lexically  sorted  canonical  form,  so  that  f(x  +  h)  appears  as  f  [h+x]  because 
lexically  h  >  x.  To  provide  the  preferred  form  while  still  subject  to  a  lexical  canonical 
from,  b  was  arbitrarily  selected  as  the  independent  variable  so  that  f(b  +  h )  appears 
as  f  [b+h] .  By  calling  pickupGenOptions  were  appropriate,  x  can  be  used  in  code 
while  b  with  appearing  in  the  output. 

29c  (define  function  options  and  associations  29c)  =  (28b) 

‘GenEqsOptionsList  =  {  IndependentVariable->Global ‘b , 

DependentVar iable->Global ' y , 
DerivativeFunction->Global ‘ f , 

StepSize->Global ‘h, 

ConstantsLabel->Global ‘ c , 

ExactCoef ficients->True , 
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NumericalPrecision->16  }; 

‘TeXEqsOptionsList  =  {  TeXTableForm->False , 

OutputFilePref ix->Null , 

OutputStreamList->$Output  }; 

Options [Equations]  =  ‘ GenEqsOptionsList ; 

Options [EquationsLaTeXed]  =  ‘TeXEqsOptionsList; 

30a  ( begin  Private  context  definitions  30a)  =  (24) 

Begin [" ‘Private' "] ; 

(*  explicitly  declare  all  local  variables  to  avoid  Global'*  collisions  *) 
{  ‘x,  ‘y,  ‘f,  ‘h,  ‘c,  ‘protected,  ‘exactp,  ‘prec,  ‘ofn,  ‘osl  }; 

30b  ( options  processing  functions  30b)  =  (24) 

pickupGenOptions [  from_,  opts _ Rule  ]  := 

Module  [  {}, 

x  =  IndependentVariable  /.  {opts}  /.  Options  [  from  ]; 

y  =  DependentVariable  /.  {opts}  /.  Options [  from  ]; 

f  =  DerivativeFunction  /.  {opts}  /.  Options [  from  ]; 

h  =  StepSize  /.  {opts}  /.  Options [  from  ]; 

c  =  ConstantsLabel  /.  {opts}  /.  Options [  from  ]; 

exactp  =  ExactCoef f icients  /.  {opts}  /.  Options [  from  ]; 
prec  =  NumericalPrecision  /.  {opts}  /.  Options  [  from  ]; 

] ; 

pickupTeXOptions [  from_,  opts _ Rule  ]  := 

Module  [  {}, 

isTabular  =  TeXTableForm  /.  {opts}  /.  Options [  from  ]; 

ofn  =  OutputFilePref ix  /.  {opts}  /.  Options  [  from  ]; 

osl  =  OutputStreamList  /.  {opts}  /.  Options  [  from  ]; 

] ; 

30c  (package  tail:  common  30c)  =  (24) 

(*  restore  protections  *) 

Protect  [  Evaluate [protected]  ]  ; 

(*  end  of  private  context  *) 

(*  protect  exported  symbols  *) 

(*  end  of  package  *) 


End  []  ; 

Protect  [  ] ; 
EndPackage  []  ; 
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Chapter  3 

Implementing  an  Integrator  for 
First-Order  Systems 

3.1  Introduction 

Implementing  a  numerical  integrator  for  first-order  systems  for  a  given  degree  n  is 
straight  forward.  In  the  following,  an  integrator  of  degree  n  =  8  is  constructed  using 
the  exact  coefficients  generated  by  the  method  described  in  Chapter  2  and  computed 
numerically  to  double-precision. 

3.2  Basic  Requirements 

To  begin,  it  is  necessary  to  select  a  programming  language  and  compiler.  For  this  ex¬ 
ample,  C++  is  the  programming  language  of  implementation.  Since  certain  aspects 
of  the  Standard  Library  are  specified  incorrectly  in  the  1998  ISO  standard  (ISO/IEC 
14882),  a  functional  compiler  must  necessarily  incorporate  defect  resolutions  pro¬ 
duced  by  the  ISO/IEC  standardization  working  group1.  A  compiler  that  addresses 
this  issue  and  provides  a  functional  Standard  Library  and  Standard  Template  Library 
(STL)  is  the  C++  compiler  found  in  the  GNU  Compiler  Collection,  gcc-3. 1 .0. 

With  the  programming  language  and  compiler  selected,  we  identify  the  highest 
level  components  necessary  to  implement  an  integrator  of  degree  n  =  8.  From  the 
previous  chapters,  we  will  need  the  associated  exact  coefficients  computed  to  double¬ 
precision,  a  fourth-order  Runge-Kutta  guesser,  and  an  iteration  by  continuous  sub¬ 
stitution  similar  to  Algorithm  1.1. 

As  a  final  basic  requirement,  we  must  choose  the  data  structure  needed  to  manip¬ 
ulate  the  array  data  that  will  arise.  Specifically,  we  would  like  a  templated,  fixed-size 
container  that  provides  amortized  constant  time  access,  is  not  bounds  checked,  be¬ 
haves  like  a  mathematical  vector,  is  optimized  for  speed,  is  amenable  to  the  BLAS 
slice 2  abstraction,  and  interacts  with  STL  algorithms.  With  a  complete  Standard 

1see  the  JTC1/SC22/WG21  web  page  at  http://std.dkuug.dk/jtcl/sc22/wg21/. 

2see  the  Basic  Linear  Algebra  Subprograms  library  at  http://www.netlib.org/blas/. 
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Library  and  STL,  there  are  many  options  available.  Fortunately,  a  combination  of 
the  Standard  Library  container  valarray  and  slice  meets  all  of  these  requirements 
individually.  Unfortunately,  the  combined  requirement  of  interaction  between  slices 
and  STL  algorithms  is  not  met  by  default  because  slices  alone  do  not  meet  STL  it¬ 
erator  requirements.  This  can  be  remedied  with  the  addition  of  a  slice_iterator 
class. 


3.3  Root  chunk:  slice_iterator 

The  slice_iterator  developed  here  is  based  largely  on  the  Slice-iter  class  presented 
in  Stroustrup  [9,  §  22.4.5,  p.  670].  Several  alterations  have  been  made  to  that  original 
design  and  will  be  discussed  as  they  appear. 

32a  (slice_iterator  32a)  = 

(si:  header  40c) 

#ifndef  PANOVSKY_RICHARDSON_SLICE_ITERATOR 
#def ine  PANOVSKY_RICHARDSON_SLICE_ITERATOR 

(si:  includes  40b) 

namespace  pr_cheby 

{ 

(si:  class  decl  32b) 

(si:  member  defs  36a) 

> 

#endif  //PANOVSKY_RICHARDSON_SLICE_ITERATOR 


In  the  case  of  slice_iterator,  as  with  all  the  supporting  code  presented  here, 
we  choose  to  place  all  code  in  the  header  file  for  inline  convenience. 

3.3.1  Class  declaration 

32b  (si:  class  decl  32b)  =  (32a) 

template  <typename  T> 
class  slice_iterator 
{ 

public : 

(si:  forward  iterator  typedef  decls  33c) 

(si:  constructor  decls  34a) 

(si:  forward  iterator  interface  decls  34b) 

(si:  access  operator  decls  35a) 

(si:  comparison  &  ordering  decls  35b) 
private : 

(si:  private  data  33a) 

(si:  private  function  decls  33b) 
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>; 

(si:  global  comparison  &  order  decls  35c) 

To  help  prevent  name  clashes  with  other  existing  libraries,  we  introduce  the 
namespace  pr_cheby.  All  remaining  code  to  support  the  integrator  in  this  exam¬ 
ple  will  be  introduced  in  this  namespace. 

3. 3. 1.1  Private  data 

The  implementation  of  slice_iterator  will  require  a  certain  amount  of  aggregated 
data  to  represent  its  internal  state.  Since  we  are  building  the  iterator  to  work  with 
valarray,  we  will  need  a  pointer  to  the  desired  instance.  Also,  we  will  need  the 
desired  slice  view,  as  well  as  an  index  indicating  the  current  element. 

33a  (si:  private  data  33a)  =  (32b) 

std: : valarray<T>*  v_; 
std : : slice  s_ ; 
size_t  cur_; 

Since  each  data  type  is  private,  the  identifiers  are  suffixed  with  an  underscore 
to  draw  attention  to  their  access  membership.  This  notation  will  be  used  in  all  the 
presented  in  this  example. 

3. 3. 1.2  Private  functions 

The  ref  member  provides  a  mechanism  to  calculate  the  slice  element  to  be  accessed 
in  v_. 

33b  (si:  private  function  decls  33b)  =  (32b) 

T&  ref (  size_t  k  ); 

const  T&  ref (  size_t  k  )  const; 

A  const-qualified  version  of  ref  is  provided. 

3. 3. 1.3  Forward  iterator  declarations 

Since  the  purpose  of  slice_iterator  is  to  allow  slice  interaction  with  STL  algo¬ 
rithms  and  provide  element  access,  it  must  meet  some  minimal  iterator  interface.  A 
minimal  iterator  interface  for  our  needs  is  the  f  orward_iterator. 

33c  (si:  forward  iterator  typedef  decls  33c)=  (32b) 

typedef  typename  std: : f orward_iterator_tag  iterator_category ; 
typedef  T  value_type; 

typedef  typename  std: :ptrdiff_t  dif f erence_type ; 
typedef  T*  pointer; 
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typedef  T&  reference; 


The  iterator_category  is  declared  as  a  forward  iterator,  and  the  remaining  dec¬ 
larations  are  provided  as  required  by  the  iterator_traits  template  class,  Stroustrup 
[9,  §  19.2.2], 

3. 3. 1.4  Constructors 

A  default  constructor  is  supplied  explicitly  so  that  arrays  of  empty  slices  may  be 
constructed  without  difficulty.  The  second  constructor  below  creates  a  specific  in¬ 
stance  of  a  slice_iterator  given  a  valarray  and  its  slice. 

Since  the  slice_iterator  is  very  simple  with  respect  to  data  (§  3. 3. 1.1),  no 
copy  constructor  or  assignment  operator  is  explicitly  defined.  The  default  compiler- 
supplied  behaviour  will  be  sufficient  for  copy  and  assignment. 

34a  (si:  constructor  decls  34a)  =  (32b) 

slice_iterator () ; 

slice_iterator (  std: : valarray<T>*  v,  std::slice  s  ); 


3. 3. 1.5  Forward  iterator  interface 

For  the  case  of  STL  iterators,  the  member  methods  begin ()  and  end()  provide  the 
interface  that  specifies  the  range  of  an  operation  over  a  container.  These  members 
return  the  first  and  one-past-the-end  iterators,  respectively.  Stroustrup  [9,  p.  670] 
seems  to  consider  only  the  case  when  the  iterator  is  initially  constructed  and  so  does 
not  provide  a  begin  ()  member.  Since  we  anticipate  that  we  will  want  to  repeatedly 
reuse  existing  iterator  instances,  a  begin  ()  member  is  supplied  to  avoid  the  additional 
overhead  of  unnecessarily  recreating  iterators  to  obtain  a  starting  iterator  element. 

34b  (si:  forward  iterator  interface  decls  34b)=  (32b)  34c  > 

slice_iterator  beginQ  ; 
slice_iterator  end() ; 


A  forward  iterator  does  not  define  any  new  expressions  beyond  the  input  iterator 
category,  but  some  of  the  input  iterator  restrictions  are  relaxed  so  that  only  two  pre- 
and  post-increment  operators  need  to  be  provided,  i.e.  (void)i++  is  dropped. 

34c  (si:  forward  iterator  interface  decls  34b)+=  (32b)  <34b 

slice_iterator&  operator++() ; 
slice_iterator  operator++(int) ; 
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3. 3. 1.6  Access  operators 

To  permit  element  access,  appropriate  operators  are  declared.  The  operator*!)  is 
provided  for  use  with  STL  algorithms  requiring  sequential  access,  and  operator  []  () 
is  provided  for  random  access  and  to  make  slice_iterator  feel  more  like  an  array, 
unlike  std:  : slice_array. 

35a  (si:  access  operator  decls  35a)  =  (32b) 

T&  operator*!); 

const  T&  operator*!)  const; 

T&  operator [] (size_t  k)  ; 

const  T&  operator []  !size_t  k)  const; 


For  each  of  the  element  access  operators  above,  a  const-qualified  version  is  also 
declared.  To  minimize  overhead,  these  const-qualified  access  operators  return  a 
reference  to  a  constant  element  rather  than  a  copy  of  the  element  accessed. 

With  regard  to  random  access  efficiency,  the  operator  []  !),  the  input  index  of 
type  size_t  should  not  be  bounds  checked. 

3. 3. 1.7  Comparison  functions 

To  facilitate  comparison  of  slice_iterator  instances,  it  is  preferable  to  provide  a  few 
public  member  functions  that  accomplish  this  task  rather  than  declare  a  large  block 
of  friend  functions.  Since  these  members  do  not  alter  state,  they  are  appropriately 
const-qualified. 

35b  (si:  comparison  &  ordering  decls  35b)  =  (32b) 

bool  slice_equal(  const  slice_iterator<T>&  in  )  const; 
bool  is_equal(  const  slice_iterator<T>&  in  )  const; 
bool  is_less_thanf  const  slice_iterator<T>&  in  )  const; 


The  member  slice_equal  should  determine  if  the  slice  contained  within  *this 
is  equivalent  to  the  slice  contained  in  the  input  in. 

3. 3. 1.8  Global  comparison  and  order  functions 

35c  (si:  global  comparison  &  order  decls  35c)  =  (32b) 

template  <typename  T>  inline 

bool  operator== (const  slice_iterator<T>&  a,  const  slice_iterator<T>&  b) 
template  <typename  T>  inline 

bool  operator != (const  slice_iterator<T>&  a,  const  slice_iterator<T>&  b) 


template  <typename  T>  inline 
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bool  operator^ (const  slice_iterator<T>&  a,  const  slice_iterator<T>&  b) ; 
template  <typename  T>  inline 

bool  operator> (const  slice_iterator<T>&  a,  const  slice_iterator<T>&  b) ; 


These  global  operators  are  required  by  the  algorithms  found  in  the  STL.  Since 
public  member  functions  are  provided  for  comparison  and  ordering,  these  functions 
will  simply  be  expanded  inline  as  forwarding  functions.  Consequently,  their  call 
overhead  will  be  eliminated  at  compile-time. 

3.3.2  Member  definitions 

36a  (si:  member  defs  36a)  =  (32a) 

(si:  private  function  defs  36b) 

(si:  constructor  defs  36d) 

(si:  forward  iterator  interface  defs  37b) 

(si:  access  operator  defs  38a) 

(si:  comparison  &  ordering  defs  39a) 

(si:  global  comparison  &  order  defs  40a) 

3. 3. 2.1  Private  functions 

Computing  the  L’th  element  of  a  slice  s  is  straightforward,  and  defined  below. 

36b  (si:  private  function  defs  36b)  =  (36a)  36c > 

template  <typename  T>  inline 
T&  slice_iterator<T> : : ref (  size_t  k  ) 

{  return!  (*v_) [s_ . start ()+k*s_ . stride!)]  );  } 

The  const-qualified  ref  is  defined  as 

36c  (si:  private  function  defs  36b)+=  (36a)  <36b 

template  <typename  T>  inline 

const  T&  slice_iterator<T> : : ref (  size_t  k  )  const 
{  return!  (*v_) [s_ . start ()+k*s_ . stride!)]  );  } 


3. 3. 2. 2  Constructors 

In  terms  of  constructors,  we  must  be  able  to  easily  construct  arrays  of  uninitialized 
slice_iterator  instances,  as  well  as  instances  that  refer  to  a  specific  slice  of  a 
valarray. 

The  default  constructor  is 
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36d  (si:  constructor  defs  36d)=  (36a)  37a > 

template  <typename  T>  inline 

slice_iterator<T> : : slice_iterator ()  :  v_(0) ,  cur_(0)  O 

As  defined,  this  constructor  simply  zeroes  v_  and  cur.,  indicating  that  the  iterator 
is  empty,  allowing  the  easy  construction  of  arrays  of  slice_iterators. 

To  create  a  slice_iterator  for  a  slice  of  a  valarray,  we  define  the  following 
constructor. 

37a  (si:  constructor  defs  36d}+=  (36a)  <36d 

template  <typename  T>  inline 

slice_iterator<T> : : slice_iterator (  std: : valarray<T>*  v,  std::slice  s  ) 
:  v_(v),  s_(s),  cur_ (0)  {} 


Copy  constructor,  destructor,  and  assignment  For  each  of  these  cases,  the 
default,  compiler-generated  definitions  are  used. 

3. 3. 2. 3  Forward  iterator  interface 

The  implementation  of  the  begin  ()  and  end()  members  is  quite  simple.  A  copy  of 
*this  is  made  and  cur_  is  set  either  to  zero  or  s_.size(),  respectively. 

37b  (si:  forward  iterator  interface  defs  37b)  =  (36a)  37c > 

template  <typename  T>  inline 
slice_iterator<T>  slice_iterator<T> : :begin() 

{ 

slice_iterator<T>  tmp  =  *this; 
tmp . cur_  =  0 ; 
return(  tmp  ) ; 

> 

template  <typename  T>  inline 
slice_iterator<T>  slice_iterator<T> : :end() 

{ 

slice_iterator<T>  tmp  =  *this; 
tmp.cur_  =  s_.size(); 
return!  tmp  ) ; 

> 


To  complete  the  iterator  interface,  we  define  the  pre-  and  post-increment  opera¬ 
tors. 
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37c  (si:  forward  iterator  interface  defs  37b)+=  (36a)  <37b 

template  <typename  T>  inline 

slice_iterator<T>&  slice_iterator<T> : : operator++() 

{ 

cur_++ ; 

return!  *this  ) ; 

> 

template  <typename  T>  inline 

slice_iterator<T>  slice_iterator<T> : : operator++(int) 

{ 

slice_iterator<T>  tmp  =  *this; 
cur_++ ; 

return (  tmp  ) ; 

> 


3. 3. 2. 4  Access  operators 

Element  access  is  provided  by  operator*  ()  and  operator  []()  and  their  const- 
qualified  equivalents.  These  member  methods  are  implemented  via  the  previously 
defined  ref  member.  For  the  operator* (),  ref  is  called  using  the  current  index, 
cur_. 

38a  (si:  access  operator  defs  38a)  =  (36a)  38b > 

template  <typename  T>  inline 
T&  slice_iterator<T> : : operator* () 

{  return!  ref(cur_)  );  } 

template  <typename  T>  inline 

const  T&  slice_iterator<T> : : operator*()  const 
{  return!  ref(cur_)  );  } 

For  random  element  access  based  on  an  input  index,  operator  []  ()  is  defined.  It 
simply  calls  ref  with  the  requested  index. 

38b  (si:  access  operator  defs  38a) +=  (36a)  <38a 

template  <typename  T>  inline 
T&  slice_iterator<T> :: operator [] (size_t  k) 

{  return!  ref (k)  );  } 

template  <typename  T>  inline 

const  T&  slice_iterator<T> :: operator [] (size_t  k)  const 
{  return!  ref (k)  );  } 
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For  each  operator  defined  here,  a  const-qualified  version  is  also  defined. 

As  previously  discussed  in  §  3. 3. 1.6,  the  access  operators  defined  here  do  not  check 
bounds  on  any  element  access  request. 

3. 3. 2. 5  Comparison  &  ordering 

To  avoid  the  use  of  friend  functions  when  providing  definitions  for  the  global  compar¬ 
ison  and  ordering  operators  needed  by  STL  algorithms,  we  choose  to  provide  several 
public  members  to  perform  these  tasks.  Then,  the  global  functions  for  comparison 
and  ordering  will  then  simply  forward  to  these  public  members. 

Equivalence  between  two  slice_iterator  instances  will  be  established  if  their 
slice,  current  index,  and  container  pointer  all  compare  favorably.  The  member 
slice_equal  checks  that  the  slices  are  equivalent. 

39a  (si:  comparison  &  ordering  defs  39a)  =  (36a)  39b  > 

template  <typename  T>  inline 

bool  slice_iterator<T> : : slice_equal (  const  slice_iterator<T>&  in  )  const 
{  return(  s_ . start ()==in. s_ . start ()  &&  s_. stride()==in. s_. strideQ  );  } 


Two  slice_iterators  are  fully  compared  with  the  member  method  is_equal. 

39b  (si:  comparison  &  ordering  defs  39a) +=  (36a)  «39a  39c  > 

template  <typename  T>  inline 

bool  slice_iterator<T> : : is_equal (  const  slice_iterator<T>&  in  )  const 
{  return(  v_==in.v_  &&  cur_==in . cur_  &&  slice_equal (in)  );  } 

The  above  definition  differs  from  that  of  Stroustrup  [9,  §  22.4.5,  p.  670]  by  the 
additional  comparison  of  v_.  The  rational  for  this  is  straight  forward.  Stroustrup 
considers  only  the  equivalence  of  the  data  view  provided  by  the  slice_iterator. 
However,  it  would  seem  that  both  the  view  and  the  data  should  compare  favorably 
before  equivalence  between  two  slice_iterators  is  established. 

Ordering  is  accomplished  with  the  definition  of  is_less_than. 

39c  (si:  comparison  &  ordering  defs  39a) +=  (36a)  o  39b 

template  <typename  T>  inline 

bool  slice_iterator<T> : : is_less_than(  const  slice_iterator<T>&  in  )  const 
{  return(  v_==in.v_  &&  slice_equal (in)  &&  cur_<in.cur_  );  } 

In  a  similar  fashion  as  with  is_equal,  we  only  consider  ordering  to  be  meaningful 
if  the  data  and  the  slice  are  equivalent. 

Each  of  the  member  methods  defined  here  are  const-qualified  since  their  opera¬ 
tions  do  not  change  the  state  of  a  slice_iterator  instance. 
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3. 3. 2. 6  Global  comparison  &  ordering 

As  mentioned  in  the  previous  section,  the  global  functions  used  by  STL  algorithms 
for  comparison  and  ordering  are  implemented  as  forwarding  functions  to  their  coun¬ 
terpart  defined  in  §  3. 3. 2. 5. 

40a  (si:  global  comparison  &  order  defs  40a)  =  (36a) 

template  <typename  T>  inline 

bool  operator==(  const  slice_iterator<T>&  a,  const  slice_iterator<T>&  b  ) 
{  return (  a. is_equal (b)  );  } 

template  <typename  T>  inline 

bool  operator !=(  const  slice_iterator<T>&  a,  const  slice_iterator<T>&  b  ) 
{  return (  ! (a==b)  ) ;  } 

template  <typename  T>  inline 

bool  operator<(  const  slice_iterator<T>&  a,  const  slice_iterator<T>&  b  ) 

{  return (  a. is_less_than(b)  );  } 

template  <typename  T>  inline 

bool  operator>(  const  slice_iterator<T>&  a,  const  slice_iterator<T>&  b  ) 

{  return (  ! (a<b)  ) ;  } 


3. 3. 2. 7  Header  &  includes 

The  slice_iterator  translation  unit  is  completed  with  the  following  include  infor¬ 
mation  and  header. 

40b  (si:  includes  40b)  =  (32a) 

#include  <cstddef> 

#include  <iterator> 

#include  <valarray> 

40c  (si:  header  40c)  =  (32a) 

//========================================================================= 

//  Project:  OTIC  technical  report  example  integrator  implementation 

// 

//  Namespace:  pr_cheby 

// 

//  Purpose:  slice  iterator  used  by  Chebyshev  integrator  of  degree  n  =  8. 

// 

//  $RCSfile:  slice-iterator . nw,v  $ 

//  $Revision:  1.17  $ 

// 
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// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

II 


$State :  Exp  $ 

$Locker:  $ 

$Source :  /home/mitche j w/work/research/tex/dtic/tr/RCS/slice-iterator . nw , v  $ 

Comments:  0.  Since  valarrayo  is  used,  slice_iterators  are  necessary  to 
use  STL  functions. 

1.  See  Stroustrup,  "The  C++  Programming  Language,  Special  Ed." 
for  more  details 

Orig.  Author:  Jason  Wm.  Mitchell 

US  Air  Force  Research  Laboratory 
Air  Vehicles  Directorate,  AFRL/VACA 
2210  Eighth  Street,  Bldg.  146,  Rm.  305 
Wright-Patterson  AFB,  OH  45433 
E-Mail :  j  ason+dtic_report2002@maiar . org 
Orig.  Date:  02-Feb-2002 
Last  Changed:  $Date:  2002/05/29  15:10:39  $ 

Copyright  (C)  2002  Jason  Wm.  Mitchell,  All  Rights  Reserved. 

Restrictions:  released  under  the  Perl  Artistic  license. 

Security:  unclassified 

This  software  is  0SI  Certified  Open  Source  Software. 

0SI  Certified  is  a  certification  mark  of  the  Open  Source  Initiative. 


3.4  Root  chunk:  default _guesser 

As  previously  suggested  initially  in  §  1.2.3  and  identified  as  a  basic  requirement 
in  §  3.2,  a  fourth-order  Runge-Kutta  scheme  will  be  used  to  jump-start  the  process 
described  by  Algorithm  1.1. 

In  terms  of  design  concepts,  it  is  useful  to  view  the  guess  generator,  and  integrators 
in  general,  as  an  operator  transforming  an  input  vector  to  some  output  vector.  As 
an  implementation,  treating  this  operator  like  a  function  is  very  convenient.  For 
example,  let  the  operation  of  guess  generation  be  represented  by  the  function  g.  Then, 
for  given  a  first-order  system  of  equations,  stepsize  h,  initial  independent  variable  .To, 
and  initial  state  yo,  the  next  state  y  is  simply  g  :  yo  ++  y.  Since  a  fourth-order  Runge- 
Kutta  method  requires  storage  of  intermediate  derivatives,  some  contextual  data  is 
associated  with  the  operator  and  we  may  think  of  it  as  a  closure.  We  implement  this 
by  providing  an  operator  ()  ()  member. 

As  with  the  previous  code,  we  introduce  all  declarations  and  definitions  in  the 
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pr_cheby  namespace. 

42a  (def  ault_guesser  42a)  = 

(dg:  header  46b) 

#ifndef  PANOVSKY_RICHARDSON_DEFAULT_GUESSER 
#def ine  PANOVSKY_RICHARDSON_DEFAULT_GUESSER 

(dg:  includes  46a) 

namespace  pr_cheby 

{ 

using  namespace  std; 

(dg:  class  decl  42b) 

(dg:  member  defs  44a) 

> 

#endif  //  PANOVSKY_RICHARDSON_DEFAULT_GUESSER 
3.4.1  Class  declaration 

The  def  ault_guesser  object  is  parameterized  by  the  scalar  type  T. 

42b  (dg:  class  decl  42b)  =  (42a) 

template  <typename  T  > 
class  def ault_guesser 
1 

public : 

(dg:  typedef  decls  43b) 

(dg:  constructors  decls  43c) 

(dg:  member-template  operator  ()  ()  decl  43d) 

private : 

(dg:  private  data  decls  42c) 

(dg:  private  function  decls  43a) 

}; 


3. 4. 1.1  Private  data 

The  internal  data  representation  is  relatively  small.  We  need  to  know  that  the  Runge- 
Kutta  method  is  fourth-order  n_,  the  number  of  first-order  equations  m_,  and  we  must 
have  storage  for  the  fully  explicit  intermediate  derivative  values  k_. 

42c  (dg:  private  data  decls  42c)  =  (42b) 

static  const  size_t  n_  =  4; 
const  size_t  m_; 

mutable  valarray<valarray<T>  >  k_; 
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The  method  order  is  fixed,  and  so  n_  is  static,  const,  of  integral  type,  and  thus 
defined  in  the  class  declaration.  Also,  the  number  of  first-order  equations  m_  will  be 
considered  to  be  constant.  The  intermediate  derivatives  k_  are  stored  in  a  valarray  of 
valarrays.  The  mutable  qualification  of  k_  is  necessary  to  permit  constant  reference 
invocations.  For  this  case,  we  choose  the  emphasize  the  stateless  mapping  operator 
behaviour  of  the  guesser,  rather  than  an  object  requiring  intermediate  states  to  com¬ 
plete  its  task.  This  may  seem  at  odds  with  the  general  design  philosophy  of  using 
constant  objects,  but  its  use  here  is  well  understood  and  documented. 

3.4. 1.2  Private  functions 

The  only  private  function  declaration  given  here  is  used  to  ban  default  construc¬ 
tion.  We  prefer  to  disallow  user  attempts  to  create  uninitialized  def  ault_guesser 
instances.  This  restriction  is  for  clarity  and  programming  convenience. 

43a  (dg:  private  function  decls  43a)  =  (42b) 

def ault_guesser () ; 

Since  we  only  seek  to  generate  compile-time  errors  with  this  mechanism,  the 
function  need  not  be  defined. 

3.4. 1.3  typedef  declarations 

The  declaration  of  class  def  ault_guesser  is  parameterized  by  type  T  which  is  cap¬ 
tured  in  a  typedef  declaration. 

43b  (dg:  typedef  decls  43b)  =  (42b) 

typedef  T  value_type ; 

3.4. 1.4  Constructors 

The  only  input  required  to  construct  an  instance  of  def  ault_guesser  is  the  number 
of  first-order  equations  m  that  are  necessary.  A  copy  constructor  is  also  provided3. 

43c  (dg:  constructors  decls  43c)  =  (42b) 

def ault_guesser (  const  size_t&  m  ); 

def ault_guesser (  const  def ault_guesser&  ); 


3. 4. 1.5  Member-template  operator()() 

The  function-like  behaviour  is  provided  by  the  member-template  operatorO  (). 
3See  §  3.4. 1.2  for  the  discussion  regarding  the  lack  of  a  public  default  constructor. 
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43d  (dg:  member-template  operator  ()  ()  decl  43d)  =  (42b) 

template  <typename  VI,  typename  V2,  typename  E  > 
void  operator!) (  const  T&  x,  const  V1&  y, 
const  T&  h,  const  E&  eqs, 

V2&  y_new  )  const; 

Choosing  a  member-template  provides  the  necessary  type  flexibility  while  retain¬ 
ing  type-safety.  While  def  ault_guesser  is  parameterized  by  T  already,  this  member- 
template  adds  the  VI,  V 2,  and  E  types.  The  types  VI  and  V2  are  intended  to  represent 
vector-like  quantities  and  that  provide  an  operator  []  ()  access  method.  The  type  E 
represents  the  system  of  first-order  equations  to  be  evaluated. 

The  argument  signature  for  the  member-template  expects  the  current  independent 
variable  x,  the  current  state  y,  the  fixed  stepsize  h,  the  first-order  equations  eqs. 
These  arguments  are  considered  inputs  and  are  const-qualified.  The  only  output 
argument  is  y_new  of  type  V2  which  is  the  estimate  of  y(x  +  h). 

The  return  type  of  the  member-template  is  void  because  the  writable  storage  for 
the  output  y_new  is  passed  into  the  method  in  the  argument  list.  In  addition,  the 
method  is  const-qualified. 

One  additional  user  enforced  requirement  here  is  that  the  scalar  types  of  VI  and 
V2  be  of  type  T.  This  is  not  an  unreasonable  expectation  and  is  a  most  likely  scenario. 

3.4.2  Member  definitions 

44a  (dg:  member  defs  44a)  =  (42a) 

(dg:  constructor  defs  44b) 

(dg:  member-template  operator ()()  de/45b) 

3.4.2. 1  Constructors 

Construction  of  the  appropriate  temporary  storage  k_  and  retention  of  the  number 
first-order  equations  m_  is  performed  by  the  user  constructor  below. 

44b  (dg:  constructor  defs  44b)  =  (44a)  45a > 

template  <typename  T>  inline 

def ault_guesser<T> : :default_guesser(  const  size_t&  m  ) 

:  m_(m),  k_(  valarray<T>(m) ,  n_  ) 

{ 

assert (  m_  >  0  ) ; 

> 


The  constructor  above  list  assigns  m_  and  uses  valarray’s  array  constructor  to 
allocate  four  valarrays  of  length  m.  The  assert  macro  is  used,  ex  post  facto,  to 
ensure  that  m  is  strictly  positive.  A  sentry  instance  could  be  a  used  to  enforce  this 
requirement  before  construction  of  k_,  however  the  assert  macro  is  sufficient  for 
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this  example.  No  attempt  is  made  to  verify  that  the  requested  memory  was  actually 
allocated.  In  addition,  any  exceptions  thrown  from  custom  allocators  are  ignored. 

The  copy  constructor  definition  attempts  to  make  sure  the  appropriate  objects 
are  constructed  and  copied. 

45a  (dg:  constructor  defs  44b) +=  (44a)  <44b 

template  <typename  T>  inline 

def ault_guesser<T> : :default_guesser(  const  def ault_guesser<T>&  g  ) 

:  m_(g.m_),  k_(  valarray<T>(g.m_) ,  n_  )  -fl¬ 
it  is  worth  noting  that  the  values  found  in  g .  k_  are  not  copied  because  they  are 
always  computed  when  needed. 

3.4. 2. 2  Member-template  operator!)  () 

The  Runge-Kutta  algorithm  presented  here  is  the  original  classical  generalization  of 
Simpson’s  rule4.  The  following  implementation  of  this  algorithm  attempts  to  mini¬ 
mize  necessary  storage  by  using  the  output  y_new  as  additional  intermediate  storage. 
The  intermediate  derivative  values  are  stored  in  the  previously  allocated  k_. 

45b  (dg:  member-template  operator  ()  ()  def  45b)  =  (44a) 

template  <typename  T> 

template  <typename  VI,  typename  V2,  typename  E  >  inline 
void  def ault_guesser<T> :: operator () (  const  T&  x,  const  V1&  y, 

const  T&  h,  const  E&  eqs, 

V2&  y_new  )  const 

{ 

const  T  h_on_2  =  h  /  T (2) ; 

eqs (  x,  y,  k_  [0]  ) ; 
y_new  =  y  +  h_on_2  *  k_  [0] ; 

eqs(  x  +  h_on_2,  y_new,  k_[l]  ); 
y_new  =  y  +  h_on_2  *  k_  [1] ; 

eqs(  x  +  h_on_2,  y_new,  k_  [2]  ); 
y_new  =  y  +  h  *  k_  [2] ; 

eqs(  x  +  h,  y_new,  k_  [3]  ); 

y_new  =  y  +  h* (  k_  [0]  +  T(2)*(k_ [1] +k_  [2] )  +  k_  [3]  )  /  T(6); 

> 


To  allow  for  the  possibility  that  the  stepsize  h  given  to  the  algorithm  may  change, 
it  is  passed  in  at  each  method  call.  But,  like  all  of  the  method  arguments,  it  is  passed 

4For  more  details  on  the  development  of  this  algorithm,  see  Atkinson  [1,  p.423]. 
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by  reference  to  prevent  unnecessary  copying  during  each  method  call.  This  hand 
optimization  is  a  concern  because  this  method  will  be  frequently  invoked. 

The  algorithm  as  described  here  clearly  sets  the  interface  requirements  for  invok¬ 
ing  the  system  of  first-order  equations.  They  must  behave  in  a  function-like  fashion, 
and  accept  the  arguments  of  independent  variable  x,  a  state  value  y  or  y_new,  and 
output  storage  for  the  derivative  values  k_  [j] .  These  arguments  must  be  of  type 
const  T&,  const  V1&  or  const  V2&,  and  valarray<T>&,  respectively.  As  previously 
mentioned,  specifying  references  will  avoid  unnecessary  copying.  This  will  be  impor¬ 
tant  for  the  derivatives  because  we  expect  them  to  be  the  most  evaluated  function 
over  the  integration. 


3.5  Includes  &  header 

The  include  files  necessary  are  cstddef ,  cassert,  and  valarray. 

46a  (dg:  includes  46a)  =  (42a) 

#include  <cstddef> 

#include  <cassert> 

#include  <valarray> 

46b  (dg:  header  46b)  =  (42a) 

//============================================================================ 

//  Project:  DTIC  technical  report  example  integrator  implementation. 

// 

//  Namespace:  pr_cheby 

// 

//  Purpose:  Default  guess  generator  for  intra-nodal  points 

// 

//  $RCSfile:  def ault-guesser . nw, v  $ 

//  $Revision:  1.19  $ 

// 

//  $State :  Exp  $ 

//  $Locker:  $ 

// 

//  $Source :  /home/mitche jw/work/research/tex/dtic/tr/RCS/def ault-guesser ,nw,v  $ 

// 

//  Comments:  0.  This  represents  the  wrapping  for  the  intra-nodal 
//  guess  generator.  The  default  guesser  is  a  classical 

//  Runge-Kutta  order  four  (4)  guesser;  simple  coefficients. 

// 

//  1.  Check  operator!)  for  the  interface  to  y(x)\mapsto  y(x+h) 

// 

//  Orig.  Author:  Jason  Wm.  Mitchell 
//  US  Air  Force  Research  Laboratory 
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// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

II 


Air  Vehicles  Directorate,  AFRL/VACA 
2210  Eighth  Street,  Bldg.  146,  Rm.  305 
Wright-Patterson  AFB ,  OH  45433  USA 
E-Mail :  j  ason+dtic_report2002@maiar . org 
Orig.  Date:  02-Feb-2002 
Last  Changed:  $Date:  2002/05/29  14:56:19  $ 

Copyright  (C)  2002  Jason  Wm.  Mitchell,  All  Rights  Reserved. 
Restrictions:  released  under  Perl  Artistic  license 
Security:  unclassified 


This  software  is  0SI  Certified  Open  Source  Software. 

0SI  Certified  is  a  certification  mark  of  the  Open  Source  Initiative. 


3.6  Root  chunk:  pr_constants 

To  allow  the  integrator  access  to  the  Mathematica®  generated  coefficients  for  de¬ 
gree  n  =  8  in  a  type  abstract  manner,  we  introduce  these  coefficients  in  a  traits 
template5.  The  double-precision  version  of  these  coefficients,  accurate  to  twenty  dec¬ 
imal  places,  are  provided  as  the  traits  template  specialized  for  type  double. 

In  addition  to  the  integrator  coefficients,  the  traits  template  should  include  any 
other  precision  related  constants  that  the  integrator  implementation  may  require.  By 
isolating  the  floating-point  constants  in  this  way,  we  ensure  that  different  precision 
floating-point  constants  can  be  used  without  altering  integration  algorithm.  In  terms 
of  implementation,  only  the  traits  template  specialized  for  the  new  type  would  need 
to  be  specified.  For  example,  a  long  double  specialization  could  be  provided  for 
the  traits  template  rather  than  the  double.  Then,  by  choosing  long  double  as  the 
scalar  type  for  all  operations,  the  integrator  would,  at  compile-time,  deduce  that  it 
should  use  the  traits  template  specialized  for  long  double,  thus  making  algorithm 
modification  unnecessary. 

47  (pr_constants  47}  = 

(pro:  header  53b) 

#ifndef  PAN0VSKY_RICHARDS0N_CHEBYSHEV_8TH_DEGREE_C0NSTANTS 
#def ine  PAN0VSKY_RICHARDS0N_CHEBYSHEV_8TH_DEGREE_C0NSTANTS 

( prc :  includes  53a) 

namespace  pr_cheby 

{ 

using  namespace  std; 


5 


Traits  template  classes  conveniently  aggregate  type  dependent  template  parameters. 
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{ prc :  traits  decl  48a) 

(pro:  double  specialization  49a) 

} 

#endif  //  PAN0VSKY_RICHARDS0N_CHEBYSHEV_8TH_DEGREE_C0NSTANTS 


3.6.1  Traits  template  declaration 

48a  {prc:  traits  decl  48a)  =  (47) 

template  <typename  T> 
struct  constants 
{ 

static  const  bool  is_specialized  =  false; 

{prc:  integral  type  decls  48b) 

{prc:  floating  type  decls  48c) 

>; 


The  is_specialized  member  provides  a  compile  time  mechanism  to  verify  that 
the  appropriate  specialization  is  provided  and  available. 

3. 6. 1.1  Integral  type  members 

In  addition  to  the  integrator  constants,  we  include  constants  for  the  maximum  number 
of  iterations  permitted  on  an  interval  and  the  iteration  residual  tolerance.  Also,  since 
it  may  be  useful  to  relax  the  residual  tolerance,  we  include  a  maximum  number  of 
unconverged  iterations  and  a  multiplicative  growth  factor  for  the  residual  tolerance. 
48b  {prc:  integral  type  decls  48b)  =  (48a) 

typedef  size_t  size_type; 
static  const  size_t  n  =  8; 

static  const  size_t  maximum_iterations  =  0; 

static  const  size_t  maximum_unconverged_iterations  =  0; 

Selection  of  the  values  related  to  the  maximum  number  of  iterations  should  be 
based  on  some  experimentation  with  the  desired  problem. 

3. 6. 1.2  Floating  type  members 

The  interpolating  weights  w  are  stored  as  an  arrays  of  arrays  of  type  T.  To  facilitate 
accessing  rows  of  weights  for  inner  product  operations,  a  typedef  declaration  is 
provided.  Also,  a  typedef  declarations  is  provided  for  the  parameterizing  type. 

Along  with  the  interpolation  weights,  two  other  sets  of  constants  are  useful  to 
precompute  for  the  iteration  algorithm:  interior  S,j  and  A —  Cj-i  for  0  <  £  < 
n  +  1. 
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48c  (prc:  floating  type  decls  48c)  =  (48a) 

typedef  T  value_type ; 

typedef  T  const  (*  const  array_type) [  n+1  ] ; 

static  const  T  epsilon; 

static  const  T  epsilon_grow_f actor ; 

static  const  T  xi [  n-1  ]; 

static  const  T  dxi [  n  ]  ; 

static  const  T  w[]  [  n+1  ]  ; 


In  the  declaration  of  arrayrtype,  we  have  deviated  from  the  convenience  use  of 
the  const-qualifier  and  moved  to  the  explicit  use  which  binds  to  the  left. 

3.6.2  Explicit  specialization  for  double 

The  implementation  precision  chosen  is  double  for  the  Intel  32-bit  platform. 

49a  (prc:  double  specialization  49a)  =  (47) 

template  <> 

struct  constants<double> 

{ 

static  const  bool  is_specialized  =  true; 

( prc  dbl:  integral  type  decls  49b) 

(prc  dbl:  floating  type  decls  49c) 

}; 


(prc  dbl:  floating  type  defs  50a) 

The  member  is_specialized  is  set  to  indicate  explicit  specialization. 

3. 6. 2.1  Specialized  integral  type  members 

49b  (prc  dbl:  integral  type  decls  49b)  =  (49a) 

typedef  size_t  size_type; 
static  const  size_t  n  =  8; 

static  const  size_t  maximum_iterations  =  16; 

static  const  size_t  maximum_unconverged_iterations  =  6; 


The  values  related  to  the  maximum  number  of  iterations  have  been  chosen  with 
the  problem  of  an  harmonic  oscillator  in  mind. 

3. 6. 2. 2  Specialized  floating  type  members 

(49a) 


49c  (prc  dbl:  floating  type  decls  49c) = 

typedef  double  value_type ; 
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typedef  double  const  (*  const  array_type)  [  n+1  ] ; 

static  const  double  epsilon; 

static  const  double  epsilon_grow_f actor ; 

static  const  double  xi [  n-1  ]  ; 

static  const  double  dxi [  n  ] ; 

static  const  double  w[]  [  n+1  ]  ; 


3. 6. 2. 3  Specialized  constant  definitions 

For  the  target  platform,  double-precision  means  approximately  sixteen  decimal  places 
of  accuracy,  and  so  the  floating-point  constants  given  here  follow  the  standard  C++ 
library  implementation  convention  of  providing  approximately  twenty  decimal  places 
in  the  definitions. 

Tolerance  related  constants:  The  iteration  residual  tolerance  is  chosen  to  be 
to  be  twice  the  unit  round  provided  by  numeric_limits<double> :  :epsilon().  If 
the  decision  is  made  to  relax  the  tolerance  requirement  by  using  a  multiplier,  that 
factor  is  taken  to  be  2.  These  particular  values  are  chosen  only  after  relatively 
little  experimentation  for  a  specific  and  well  understood  problem  and  should  not  be 
considered  a  uniform  choice  for  all  problems. 

50a  (pro  dbl:  floating  type  defs  50a)  =  (49a)  50b  t> 

const  double  constants<double> :: epsilon  = 
numeric_limits<double> : : epsilonO  *  2; 

const  double  constants<double> :: epsilon_grow_f actor  =  2.0; 


Interior  intra-nodal  points:  The  interior  locations  are  computed  exactly  and 
stored.  The  end-points  are  excluded  to  reduce  rounding  errors  in  the  algorithm.  As 
a  result  of  this,  evaluations  at  the  end-points  must  be  handled  individually. 

50b  ( pro  dbl:  floating  type  defs  50a)+=  (49a)  <50a  51a> 

template  <> 

const  double  constants<double> : :xi []  = 

{ 

3 . 806023374435662 1936e-02 , 

1 . 4644660940672623780e-01 , 

3 . 086582838174551 1414e-01 , 

5 . 0000000000000000000e-01 , 

6 . 9134171618254488586e-01 , 

8 . 5355339059327376220e-01 , 

9 . 6193976625564337806e-01 , 
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>; 


Intra-nodal  spacing:  Algorithm  1.1  requires  that  guesses  are  generated  at  the 
intra-nodal  points.  Since  the  intra-nodal  spacing  is  not  fixed,  A is  computed  and 
stored  for  use  by  the  guess  generating  method. 

51a  (prc  dbl:  floating  type  de/s  50a) +=  (49a)  <50b  51b  > 

template  <> 

const  double  constants<double> : : dxi  []  = 

{ 

3 . 806023374435662 1936e-02 , 

1 . 083863756623696 1586e-01 , 

1 . 62211 67441 072887634e-01 , 

1 . 9134171618254488586e-01 , 

1 . 9134171618254488586e-01 , 

1 . 62211 67441 072887634e-01 , 

1 . 083863756623696 1586e-01 , 

3 . 806023374435662 1936e-02 

>; 

The  data  is  obviously  symmetric,  however,  it  convenient  to  store  all  A for 
looping  logic.  The  resulting  redundant  data  is  not  significant  in  size  and  so  their 
storage  is  not  optimized. 

Integration  weights:  The  exact  integration  weights  Wjk,  written  to  twenty  dec¬ 
imal  places,  are  stored  in  w  such  that  each  row  represents  the  weights  in  the  inner 
product  for  one  intra-nodal  point  as  described  by  Eq.  (1.16) 

51b  (prc  dbl:  floating  type  defs  50a)+=  (49a)  <51a 

template  <> 

const  double  constants<double> : :w[]  [n+1]  = 

{ 

{ 

1 . 5446942589330503001e-02 ,  2 . 4571482764589171269e-02 , 

-2 . 729203169311 755 1470e-03,  1 . 2032717847525820515e-03 , 

-7 . 2548587956445056873e-04 ,  5 . 1933327638929719332e-04 , 

-4. 1852184693699231789e-04 ,  3 . 7047163577776345416e-04 , 

-1 . 7805741066949699949e-04 

>, 

{ 

1 . 1622746778311606175e-03,  9 . 0507498067101649271e-02 , 

6 . 1703929899043699 124e-02 ,  -1 . 0149503593034591360e-02 , 

5 . 254 18597066 11 99 1662e-03 ,  -3 . 5448091021551241652e-03 , 
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2 . 7783648001 647387572e-03 , 
1 . 1 6227467783 1 1 606 175e-03 

}, 

{ 

1 . 32993390 1732 1784808e-02 , 
1 . 5851788614537362019e-01 , 
-1 ,4811162089693133896e-02, 
-5 . 8380991 989 182836497e-03 , 
-2 . 3256609826782151916e-03 
}, 

{ 

3 . 9682539682539682540e-03 , 
1 . 2876683494014880164e-01 , 
9 . 84 126984 126984 12698e-02 , 
1 . 0915704742390880903e-02 , 
3 . 9682539682539682540e-03 

>, 

{ 

1 . 0262168919186151699e-02 , 
1 . 4552063888145796619e-01 , 
2 . 11 6365589 1508995929e-01 , 
-1 . 8835346462833937648e-02 , 
-5 . 3628310808138483005e-03> 

{ 

6 . 7742332586767758905e-03 , 
1 . 3690417488237494378e-01 , 
1 . 9157121085473562623e-01 , 
7 . 79786097834959834 16e-02 , 
6 . 7742332586767758905e-03 

>, 

{ 

8. 1145653471774335074e-03, 
1 . 4010106152947667486e-01 , 
1 . 9755088270496127597e-01 , 
1 . 424 1 174285 185 143769e-01 , 
-7 . 5104346528225664926e-03 
>, 

{ 

7 . 9365079365079365079e-03 , 
1 . 3968253968253968254e-01 , 
1 . 9682539682539682540e-01 , 
1 . 3968253968253968254e-01 , 


-2 . 4276059907 176542285e-03 , 


6 . 1002579087781 57655 le-02 , 
8 . 5788009730346 129385e-02 , 
8 . 1141101793756148493e-03, 
4 . 9112819285460210914e-03 , 


8 . 1654337316187620786e-02 , 
1 . 993097 11 753 15382270e-01 , 
-1 . 845078239290893 1947e-02 , 
-8 . 54501 2708 1785432803e-03 , 


6 . 81 9804267946305641 5e-02 , 
1 . 7274481918086927590e-01 , 
9 . 507091 962989876 1363e-02 , 
1 . 2106745520227500955e-02 , 


7 . 553693059872673 1734e-02 , 
1 . 844037384624000 149 le-01 , 
1 . 9100843295327948211e-01 , 
-1 . 73981 7345909257 1765e-02 , 


7 . 2738852972231 3 14052e-02 , 
1 . 8033959608385559355e-01 , 
1 . 7965565757549230870e-01 , 
4 . 8537841 84341 9906236e-02 , 


7 . 3109324608009077506e-02 , 
1 . 8085892936024489075e-01 , 
1 . 8085892936024489075e-01 , 
7 . 3109324608009077506e-02 , 


52 


CHAPTER  3.  EXAMPLE  FOR  FIRST-ORDER  SYSTEMS 


7 . 9365079365079365079e-03 

} 

}; 

3.6.3  Includes  &c  headers 

53a  (prc:  includes  53a)  =  (47) 

#include  <limits> 

#include  <cstddef> 

53b  (prc:  header  53b)  =  (47) 

//======================================================================= 

//  Project:  OTIC  technical  report  example  integrator  implementation 

// 

//  Namespace:  pr_cheby 

// 

//  Purpose:  specialized  constants  for  Chebyshev  integrator  of 
//  degree  n  =  8. 

// 

//  $RCSfile:  pr-constants . nw, v  $ 

//  $Revision:  1.15  $ 

// 

//  $State :  Exp  $ 

//  $Locker:  $ 

// 

//  $Source :  /home/mitchejw/work/research/tex/dtic/tr/RCS/pr-constants . nw, v  $ 

// 

//  Comments:  0.  Change  constants  here  for  the  desired  type. 

// 

//  Orig.  Author:  Jason  Wm.  Mitchell 
//  US  Air  Force  Research  Laboratory 

//  Air  Vehicles  Directorate,  AFRL/VACA 

//  2210  Eighth  Street,  Bldg.  146,  Rm.  305 

//  Wright-Patterson  AFB,  OH  45433 

//  E-Mail:  j ason+dtic_report2002@maiar . org 

//  Orig.  Date:  02-Feb-2002 
//  Last  Changed:  $Date:  2002/05/29  15:05:23  $ 

// 

//  Copyright  (C)  2002  Jason  Wm.  Mitchell,  All  Rights  Reserved. 

//  Restrictions:  released  under  the  Perl  Artistic  license 
//  Security:  unclassified 

// 

//  This  software  is  0SI  Certified  Open  Source  Software. 
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//  OSI  Certified  is  a  certification  mark  of  the  Open  Source  Initiative. 
//======================================================================== 

3.7  Root  chunk:  pr_cheby 

With  the  supporting  code  defined,  we  move  on  to  the  implementation  of  the  example 
integrator. 

54a  (pr_cheby  54a)  = 

(pr:  header  65) 

#ifndef  PAN0VSKY_RICHARDS0N_CHEBYSHEV_8TH_DEGREE 
#def ine  PAN0VSKY_RICHARDS0N_CHEBYSHEV_8TH_DEGREE 

(pr:  includes  64c) 

namespace  pr_cheby 

{ 

using  namespace  std; 

(pr:  class  decl  54b) 

(pr:  member  defs  58a) 

> 

#endif  //  PAN0VSKY_RICHARDS0N_CHEBYSHEV_8TH_DEGREE 

3.7.1  Class  declaration 

54b  (pr:  class  decl  54b)  =  (54a) 

template  <typename  T,  typename  EqsT,  typename  GuessT  =  def ault_guesser<T>  > 
class  integrator 
{ 

public : 

(pr:  public  typedef  decls  56d) 

(pr:  enumerated  status  codes  57a) 

(pr:  constructor  decl  57b) 

(pr:  member-template  operator  ()  ()  decl  57c) 

private : 

(pr:  private  typedef  decls  55a) 

(pr:  private  data  decls  55b) 

(pr:  private  function  decls  56b) 

}; 


The  integrator  is  parameterized  by  the  desired  scalar  type  T,  as  well  as  by 
the  type  of  equations  and  the  guesser,  EqsT  and  GuessT,  respectively.  The  template 
parameter  GuessT  has  as  a  default  argument  the  previously  defined  def  ault_guesser 
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object.  Supplying  a  default  type  to  GuessT  will  provide  a  less  cumbersome  interface 
when  using  the  default  guesser. 

3. 7. 1.1  Private  data 

55a  ( pr :  private  typedef  decls  55a)  =  (54b) 

typedef  typename  constants<T> : : array_type  array_type; 

The  array_type  typedef  is  forwarded  from  the  traits  template  constants  for 
local  use. 

(pr:  private  data  deck  55b)  =  (54b)  55c  > 

static  const  size_t  n_  =  constants<T> : :n; 
const  T*  xi_; 

const  T*  dxi_; 

const  array_type  w_; 

size_t  iter_max_; 

T  epsilon_; 

To  eliminate  the  scoping  prefix  when  accessing  the  specialized  traits  template 
constants,  we  declare  local  shorthands  for  each  identifier  but  with  the  established 
access  membership  suffix.  In  the  case  of  the  method  degree,  its  value  is  assigned 
directly  since  it  is  constant  and  of  integral  type.  Although  iter_max_  is  of  integral 
type,  its  value  is  not  assigned  directly,  allowing  the  possibility  of  assignment  at  con¬ 
struction.  Also,  iter_max_  is  not  const-qualified  since  it  may  be  useful  to  alter  the 
value  based  on  convergence  performance. 

(pr:  private  data  deck  55b) +=  (54b)  <55b  55d> 

static  const  size_t  o_  =  n_  +  1 ; 

As  shown  by  Figure  1.1,  the  total  number  of  nodal  points  in  a  given  interval  is 
n  +  1,  so  that  value  is  assigned  here  as  o_. 

55d  (pr:  private  data  deck  55b) +=  (54b)  <55c  55e> 

const  size_t  m_; 
const  T  h_; 

The  number  of  first-order  equations  m_  and  the  fixed  stepsize  h_  are  declared  and 
const-qualified. 

55e  (pr:  private  data  deck  55b) +=  (54b)  <55d  56a  > 

valarray<T>  f_arena_; 

slice_iterator<T>  f_[  o_  ]; 

valarray<valarray<T>  >  y_; 


55b 


55c 
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The  declarations  above  are  responsible  for  storing  the  computed  derivative  and 
solution  values,  f  _arena_  and  y_  respectively,  over  the  interval. 

Regarding  f_arena_,  recall  that  Eq.  (1.16)  requires  an  inner  product  operation 
involving  the  weights  Wjk  and  the  derivative  values  fk •  These  weights  are  stored 
in  the  traits  template  constants  such  that  each  row  represents  the  coefficients  for 
one  first-order  equation,  yj.  To  efficiently  use  the  STL  algorithm  inner  .product, 
the  derivative  information  should  also  be  stored  in  the  same  sense,  i.e.  one  row  of 
derivatives  should  represent  the  derivative  values  at  each  node  point  for  the  first- 
order  equation  of  interest.  However,  evaluating  the  system  of  first-order  equations 
will  provide  values  for  all  the  first-order  equations  at  a  given  node — the  transpose 
of  our  desired  situation.  To  handle  this,  a  block  of  memory  large  enough  to  hold 
all  the  derivative  information  is  allocated  as  a  valarray  and  identified  as  f_arena_. 
This  memory  is  handed  to  the  system  of  first-order  equations  as  a  slice_iterator 
whose  slice  correctly  spans  the  arena  so  that  every  row  of  f  .arena,  represents  the 
derivative  values  at  the  nodal  points  for  the  first-order  equation  of  interest.  Since 
there  are  n  +  1  points,  we  allocate  o_  iterators. 

56a  ( pr :  private  data  deals  55b)  +=  (54b)  «55e 

EqsT  eqs_; 

GuessT  guess.; 


Lastly,  it  is  convenient  to  contain  copies  of  the  first-order  equations  and  the 
guesser.  The  overhead  associated  with  retaining  copies  of  these  objects  is  small  and 
only  occurs  at  integrator  construction. 

3. 7. 1.2  Private  functions 

56b  {pr:  private  function  deals  56b) =  (54b)  56c  > 

void  show.static.coeff icients.O  const; 

For  debugging  purposes,  a  private  method  is  provided  to  output  the  coefficients 
imported  from  the  traits  template  constants. 

56c  {pr:  private  function  deals  56b)+=  (54b)  <56b 

integrator () ; 

integrator (  const  integrator&  ) ; 

The  remaining  private  declarations  enforce  a  ban  on  default  and  copy  construction 
for  integrator. 

3. 7. 1.3  Public  typedefs 

56d  {pr:  public  typedef  deals  56d)=  (54b) 

typedef  T  value.type ; 

typedef  EqsT  equation.type ; 
typedef  GuessT  guesser.type ; 
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The  input  template  parameters  are  captured  in  the  above  public  typedef  decla¬ 
rations. 

3. 7. 1.4  Convergence  codes 

From  Algorithm  1.1,  we  must  have  some  method  to  indicate  that  a  particular  iteration 
sequence  either  converged  or  failed  to  converge.  This  is  handled  with  an  enumeration. 

57a  ( pr :  enumerated  status  codes  57a)  =  (54b) 

enum  status_code_t  {  CONVERGENCE_FAILED  =  -1,  OK  =  0  >; 


Convergence  is  given  the  label  OK  and  assigned  a  value  of  zero.  Convergence 
failure  is  indicated  by  a  value  of  -1  is  given  the  label  CONVERGENCE_FAILED. 

3. 7. 1.5  Constructor 

To  construct  an  instance  of  integrator,  we  require  the  fixed  stepsize,  the  system  of 
first-order  equations,  and  a  guesser. 

57b  (pr:  constructor  decl  57b)=  (54b) 

integrator (  const  T&  stepsize,  const  EqsT&  eqs, 

const  GuessT&  guess  =  def ault_guesser<T> (EqsT : : size () )  ); 


With  this  default  argument  declaration,  we  see  an  additional  requirement  is  added 
to  the  interface  to  the  first-order  equations.  The  object  must  provide  the  static 
member  method  size()  to  return  the  number  of  first-order  equations  involved. 

3. 7. 1.6  Member-template  operator()() 

The  function-like  behaviour  here  is  provided  by  the  member-template  operator ()  () . 

57c  (pr:  member-template  operator()()  decl  57c)=  (54b) 

template  <typename  V> 

int  operator()(  const  T&  x,  V&  yn  ) ; 

As  discussed  in  §  3. 4. 1.5,  the  additional  type  V  is  intended  to  indicate  that  yn 
should  behave  like  a  mathematical  vector,  and  provide  an  operator  []  ()  random 
access  method. 

The  argument  list  expects  the  current  value  of  the  independent  variable  x  and 
the  value  of  the  current  state  yn.  The  type  V  is  not  const-qualified  for  yn  since  the 
input  state  will  be  over-written  with  the  estimate  of  the  state  at  x  +  h.  The  value 
of  x  is  unchanged  and  thus  const-qualified,  thus  x  must  be  adjusted  by  the  user  for 
the  next  step.  A  return  type  of  int  is  used  to  return  the  convergence  status  of  the 
method  invocation.  The  implicit  conversion  of  the  returned  enumerated  convergence 
status  code  of  type  status_code_t  is  understood  and  acceptable. 
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3.7.2  Member  definitions 

58a  ( pr :  member  defs  58a)  =  (54a) 

( pr :  constructor  def  58b) 

(pr:  debug  support  def  59d) 

(pr:  member-template  operatorQQ  def  60c) 


3.7.2. 1  Constructor 

58b  (pr:  constructor  def  58b)  =  (58a) 

template  <typename  T,  typename  EqsT,  typename  GuessT> 
inline 

integrator<T, EqsT, GuessT> :: integrator (  const  T&  stepsize, 

const  EqsT&  eqs, 
const  GuessTfe  guess  ) 

(pr:  c’tor  list  58c) 

{ 

(pr:  c  ’tor  body  58d) 

> 


As  previously  established  in  §  3. 7. 1.5,  the  guess  argument  is  given  a  default  value 
of  def  ault_guesser<T>  if  it  is  not  explicitly  provided. 

58c  (pr:  c ’tor  list  58c)  =  (58b) 

:  xi_(  constants<T> : :xi  ), 
dxi_(  constants<T> : : dxi  ), 
w_(  constants<T> : : w  ), 

iter_max_(  constants<T> : :maximum_iterations  ), 
epsilon_(  constants<T> :: epsilon  ), 
m_ (  EqsT : : size ()  )  , 
h_(  stepsize  ), 

f_arena_(  EqsT:: size ()  *  o_  ) , 
y_(  valarray<T> (EqsT :: size () ) ,  o_  ), 
eqs_ (  eqs  ) , 
guess_(  guess  ) 

The  constructor  list  definition  is  straightforward.  First,  each  shorthand  notation 
presented  in  §  3. 7. 1.1  is  initialized  with  its  traits  template  counterpart.  Next,  the 
number  of  first-order  equations  and  stepsize  are  stored.  Then,  the  storage  for  the 
derivative  and  solution  values  at  the  node  points  is  allocated.  Finally,  the  first-order 
equations  and  guesser  are  copied  and  stored  locally. 

58d  (pr:  c’tor  body  58d)=  (58b)  59a  > 

assert  (  m_  >  0  ) ; 
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After  constructor  list  completion,  we  verify  that  the  number  of  first-order  equa¬ 
tions  is  strictly  positive. 

59a  (pr:  c’tor  body  58d)+=  (58b)  <58d  59b > 

for(  size_t  k  =  0;  k  <  o_;  k++  ) 

f_[k]  =  slice_iterator<T>(&f_arena_,  slice(k,m_,o_) ) ; 

The  next  construction  task  is  to  initialize  the  array  of  slice_iterators  so  that 
they  span  f_arena_  in  the  desired  fashion.  In  this  case,  each  slice  has  a  starting 
index  of  k,  with  length  m_  and  stride  of  m_  and  o_,  respectively. 

59b  (pr:  c’tor  body  58d}+=  (58b)  <59a  59c > 

for(  size_t  k  =  0;  k  <  y_.size();  k++  ) 
assert (  y_[k].size()  !=  0  ); 

In  the  above,  we  verify  that  the  length  of  the  elements  of  y_  are  nonzero. 

59c  (pr:  c’tor  body  58d}+=  (58b)  <59b 

#if def  PR_CHEBY_SHOW_STATIC_COEFFICIENTS 
show_static_coef f icients_() ; 

#endif  //  PR_CHEBY_SHOW_STATIC_COEFFICIENTS 

Lastly,  we  provide  a  preprocessor  switch  to  trigger  the  output  the  static  coefficients 
contained  in  constants. 

3. 7. 2. 2  Debug  support 

59d  (pr:  debug  support  def  59d)=  (58a) 

template  <class  T,  class  EqsT,  class  GuessT> 
inline 

void  integrator<T,EqsT,GuessT>: : show_static_coef f icients_ ()  const 

{ 

(pr:  debug:  show  £j  59e) 

(pr:  debug:  show  60a) 

(pr:  debug:  show  Wjk  60b) 

> 


Since  the  above  function  does  not  change  the  state  of  integrator,  it  is  const- 
qualified. 

59e  (pr:  debug:  show  £j  59e)=  (59d) 

for(  size_t  j  =  0;  j  <  n_  -  1;  j++  ) 

fprintf  (stderr ,  "xi  [°/02i]  :  \t°/0  23.16e\n",  j,  xi_[j]); 

f printf (stderr , "\n" ) ; 
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The  interior  intra-nodal  points  are  output  first.  These,  as  well  as  the  remaining 
constants,  are  written  to  stderr. 

The  function  fprintf  is  used  here  rather  than  cerr  for  performance  reasons. 
Standard  C++  stream  output  for  the  compiler  and  library  version  selected  can  be  up 
to  a  factor  of  eight  times  slower  than  printf ,  or  C  style,  output.  This  includes  the 
case  when  output  is  redirected  to  a  null  device.  In  addition,  stream  output  does  not 
allow  for  the  same  formating  flexibility  as  C  style  output.  For  these  reasons,  C  style 
output  will  be  used  for  all  output. 

60a  ( pr :  debug:  show  A 60a)  =  (59d) 

for(  size_t  j  =  0;  j  <  n_  -  2;  j++  ) 

fprintf (stderr , "dxi  [%2i] : \t%  23.16e\n",  j,  dxi_[j]); 

fprintf (stderr , "\n" ) ; 


Next,  we  output  A£p 

60b  (pr:  debug:  show  Wjk  60b)  =  (59d) 

for(  size_t  j  =  0;  j  <  n_;  j++  ) 
for(  size_t  1=0;  1  <  o_;  1++  ) 

fprintf (stderr, "w [%2i ,%2i] : \t%  23 . 16e\n" ,  j , 1 , w_  [j]  [1] ) ; 

fprintf (stderr , "\n" ) ; 

Lastly,  we  output  the  integration  weights  wjk- 

3. 7. 2. 3  Member-template  operator ()() 

This  member-template  definition  implements  an  iteration  scheme  similar  to  that  de¬ 
scribed  by  Algorithm  1.1.  The  difference,  of  course,  being  the  use  of  precomputed 
and  exact  integration  weights. 

60c  (pr:  member -template  operator  ()()  def  60c}=  (58a) 

template  <class  T,  class  EqsT,  class  GuessT> 

template  <class  V> 

inline 

int  integrator<T,EqsT,GuessT>: :operator() (  const  T&  x,  V&  yn  ) 

{ 

(pr:oper:  local  deals  61a) 

(pr:oper:  store  yo  &  /o  info  61b) 

(pr:oper:  generate  guesses  for  y.j  if  j  /  0  61c) 

(pr:oper:  iteration  loop  61d) 

(pr:oper:  post  iteration  operations  63a) 

(pr:oper:  return  convergence  status  64b) 

} 
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The  argument  list  above  is  straightforward,  and  the  interface  requirements  are 
discussed  in  the  declaration  found  in  §  3. 7. 1.6. 

61a  ( pr:oper :  local  decls  61a)  =  (60c) 

status_code_t  status  =  OK; 
bool  is_converged  =  false; 
size_t  iter_count  =  0; 

T  sum; 

T  residual; 


Several  locally  scoped  values  are  declared  and  initialized  here.  The  first  declara¬ 
tion  status  of  type  status_code_t  is  used  to  report  the  convergence  status  of  the 
iteration  sequence.  It  is  initially  assumes  convergence  and  is  assigned  the  enumerated 
value  OK.  The  next  declaration  is_converged  is  a  bool  that  is  used  as  a  local  loop 
continuation  flag.  The  iter_count  declaration  counts  the  number  of  completed  iter¬ 
ations.  The  last  two  floating-point  declarations  sum  and  residual  are  used  to  hold 
the  newly  computed  solution  and  the  residual  between  the  new  and  old  solution  at 
an  intra-nodal  point,  respectively. 

61b  ( pr:oper :  store  yo  &  fo  info  61b)  =  (60c) 

y_[0]  =  yn; 

eqs_(  x,  yn,  f_  [0]  ) ; 

Initially,  the  input  solution  yn  is  stored  in  y_[0],  and  then  the  derivatives  are 
computed  for  yn  and  stored  in  f_[0] . 

61c  (pr:oper:  generate  guesses  for  yj  if  j  /  0  61c)=  (60c) 

for(  size_t  j  =  0;  j  <  n_;  j++  ) 

guess_(  x  +  h_*xi_  [j]  ,  y_[j],  h_*dxi_[j],  eqs_,  y_[j  +  l]  ); 

To  bootstrap  the  iteration  process,  solution  guesses  at  the  intra-nodal  points  are 
generated  with  guess_.  The  supplied  guesser  must  meet  the  interface  defined  in 
§  3. 4. 1.5  and  §  3. 4. 2. 2.  The  intra-nodal  locations  and  stepsizes  are  supplied  to  the 
guesser  in  terms  of  hfj.  With  respect  to  the  iteration,  the  solution  guess  computed 
with  input  y_[j]  is  stored  in  y_[j+l] . 

61d  ( pr:oper :  iteration  loop  61d)=  (60c) 

while (  ! is_converged  &&  iter_count++  <  iter_max_  ) 

{ 

is_converged  =  true; 

(pr:oper:iter:a:  compute  derivatives  62a) 

(pr:oper:iter:a:  compute  solution  for  each  equation  and  node  62b) 

} 

yn  =  y_  [nj  ; 
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The  iteration  loop  continues  only  if  the  solution  has  neither  converged  nor  reached 
the  maximum  number  of  iterations  specified.  Inside  the  loop,  convergence  is  initially 
assumed  to  be  true.  This  logic  may  seem  unconventional,  but  convergence  fails  if  the 
residual  at  any  nodal  point  for  any  equation  is  above  the  specified  iteration  tolerance. 
Thus,  it  is  more  convenient  to  register  a  single  failure  rather  than  success  at  every 
nodal  point  for  all  equations. 

Once  the  iteration  has  completed,  the  new  estimate  for  y(x  +  h)  is  copied  back 
into  yn  before  returning  to  the  calling  method. 

62a  ( pr:oper:iter:a :  compute  derivatives  62a)  =  (61d) 

for(  size_t  j  =  1;  j  <  n_;  j++  ) 

eqs_(  x  +  h_*xi_  [j]  ,  y_[j],  f_[j]  ); 

eqs_(  x  +  h_,  y_  [n_] ,  f_[n_]  ); 

Computing  the  derivatives  is  straightforward.  But,  we  must  remember  to  compute 
fn  since  £n  =  1  is  not  contained  in  xi_. 

62b  ( pr:oper:iter:a :  compute  solution  for  each  equation  and  node  62b)  =  (61d) 

for(  size_t  1=0;  1  <  m_;  1++  ) 

{ 

for(  size_t  j  =  0;  j  <  n_;  j++  ) 

{ 

( pr:oper:iter:b :  compute  yj  62c) 

(pr:oper:iter:b:  check  residual  and  store  new  value  62d) 

> 

> 

Within  the  main  iteration  loop,  the  solution  for  each  equation  1  at  each  nodal 
point  j  is  considered. 

62c  (pr:oper:iter:b:  compute  yj  62c)  =  (62b) 

sum  =  y_  [0]  [1]  +  h_  * 

inner_product (  &w_[j]  [0] ,  &w_[j]  [o_] ,  &f _arena_ [l*o_] ,  T(0)  ) ; 

The  new  solution  at  the  current  nodal  point  as  prescribed  by  Eq.  (1.16)  is  com¬ 
puted  and  stored  in  sum.  The  STL  algorithm  inner_product  is  used  to  handle  the 
inner  product  between  the  exact  coefficients  Wjk  and  the  derivatives  fk  for  each  nodal 
point  j. 

62d  (pr:oper:iter:b:  check  residual  and  store  new  value  62d)=  (62b) 

residual  =  fabs(  sum  -  y_[j  +  l]  [1]  ); 

if (  residual  >  epsilon_  ) 
is_converged  =  false; 

y_  [j  +  1]  [1]  =  sum; 
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With  the  newly  computed  solution  stored  in  sum,  it  is  compared  to  the  previous 
estimate  y_[j+l]  [1]  and  the  residual  is  computed.  If  the  residual  is  greater  than 
the  iteration  tolerance  specified  by  epsilon_,  then  the  solution  is  tagged  as  not  yet 
converged. 

After  the  convergence  check,  the  newly  computed  solution  sum  replaces  the  pre¬ 
vious  value  y_  [j+1]  [1]. 

63a  (pr:oper:  post  iteration  operations  63a)  =  (60c) 

bool  convergence_f ailed  =  (iter_count  >  iter_max_  &&  residual  >  epsilon_) 

( pr:oper :  warn  if  convergence  failed  63b) 

( pr:oper :  should  grow  iteration  tolerance ?  63c) 

(pr:oper:  show  convergence  statistics  64a) 

After  the  iteration  for  the  interval  has  completed,  several  preprocessor  selectable 
options  are  provided.  Two  of  the  options  provide  status  information  regarding  the 
iteration.  The  third  option  allows  the  iteration  tolerance  to  be  relaxed  in  a  prescribed 
manner. 

Since  two  of  the  provided  options  require  the  same  boolean  test,  a  single  bool  is 
defined  outside  of  the  preprocessor  scoped  options.  The  value  of  convergence .failed 
is  considered  to  be  true  if  the  maximum  iteration  count  is  exceeded  and  the  residual 
is  greater  than  the  desired  tolerance. 

63b  (pr:oper:  warn  if  convergence  failed  63b)  =  (63a) 

#if def  PR_CHEBY_CONVERGENCE_WARN 
if (  convergence_f ailed  ) 

{ 

status  =  CONVERGENCE_FAILED ; 
f printf (stderr , 

operator () (...) :  Warning!  Convergence  f ailure ! \n") ; 
f printf (stderr , "  x:  %  23.16e,  residual:  %  23.16e\n",  x,  residual); 

> 

#endif  //  PR_CHEBY_CONVERGENCE_WARN 

If  selected,  the  above  code  block  will  warn  of  convergence  failure  and  provide  the 
values  of  the  independent  variable  and  the  residual.  This  information  is  written  to 
stderr  to  avoid  injecting  warning  information  into  the  user  data  stream  on  stdout6. 

In  addition  to  the  report,  the  value  of  status  is  updated  to  reflect  the  current  iteration 
state. 

63c  (pr:oper:  should  grow  iteration  tolerance?  63c)  =  (63a) 

#if  defined  PR_CHEBY_GR0W_EPSIL0N 
static  size_t  convergence_watch  =  0; 
if (  convergence_f ailed  ) 

{ 

6See  §  3. 7.2. 2  for  the  discussion  regarding  the  choice  of  C  style  output  rather  than  C++  streams. 
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if (  ++convergence_watch  > 

constants<T> : :maximum_unconverged_iterations  ) 

{ 

epsilon_  *=  constants<T> :: epsilon_grow_f actor ; 
fprintf (stderr , 

operator () (...) :  Warning!  Growing  epsilon : °/023. 16e\n"  , 
epsilon_) ; 

> 

} 

#endif  //  PR_CHEBY_GROW_EPSILON 

If  the  above  option  is  selected,  it  will  permit  the  iteration  tolerance  to  be  relaxed 
for  the  duration  of  the  integration.  A  static  value  labeled  convergence_watch  keeps 
track  of  the  number  of  times  convergence  has  failed  throughout  the  integration.  If  it 
fails  to  converge  a  number  of  times  specified  by  maximum_unconverged_iterations 
in  the  traits  template  constants,  the  iteration  tolerance  epsilon,  is  multiplied  by 
epsilon_grow_f  actor,  also  specified  in  the  constants  traits  template. 

64a  ( pr:oper :  show  convergence  statistics  64a)  =  (63a) 

#if def  PR_CHEBY_SHOW_STATS 

fprintf (stderr , "x :  %  23.16e,  Passes:  %3i,  Residual:  %  23.16e\n", 
x,  iter.count,  residual); 

#endif  //  PR_CHEBY_SHOW_STATS 


The  last  preprocessor  selectable  option  reports  status  information  on  the  recently 
completed  iteration.  It  provides  the  values  of  the  independent  variable,  the  number 
of  iterations,  and  the  final  residual. 

64b  (pr:oper:  return  convergence  status  64b)=  (60c) 

return!  status  ) ; 

Once  the  sequence  is  complete,  the  status  is  returned  to  the  calling  method. 


3.7.3  Includes  &  header 

64c  (pr:  includes  64c)  = 

#include  <cassert> 
#include  <cstddef> 
#include  <cstdio> 


#include  <algorithm> 
#include  <numeric> 
#include  <limits> 


#include  "pr.constants" 
#include  "def ault.guesser" 


(54a) 
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#include  "slice_iterator" 


(pr:  header  65)  = 
//=========== 


(54a) 


// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

//= 


Project:  OTIC  technical  report  example  integrator  implementation 
Namespace:  pr_cheby 

Purpose:  Perform  the  Chebyshev  integration  for  degree  n  =  8. 

$RCSfile:  pr-cheby.nw,v  $ 

$Revision:  1.9  $ 

$State :  Exp  $ 

$Locker:  $ 

$Source :  /home/mitchejw/work/research/tex/dtic/tr/RCS/pr-cheby ,nw,v  $ 

Comments:  0.  This  code  should  (in  general)  not  be  touched.  Nothing  here  is 
application  specific.  If  you  want  to  change  the  guessing 
mechanism,  look  at  def ault_guesser .  Precision  changes, 
look  at  constants. 

1.  This  code  makes  no  attempt  to  automatically  adjust  step  size 
or  method  order  to  match  truncation  error  tolerances. 

□rig.  Author:  Jason  Wm.  Mitchell 

US  Air  Force  Research  Laboratory 
Air  Vehicles  Directorate,  AFRL/VACA 
2210  Eighth  Street,  Bldg.  146,  Rm.  305 
Wright-Patterson  AFB,  OH  45433 
E-Mail :  j ason+dtic_report2002@maiar . org 
Orig.  Date:  02-Feb-2002 
Last  Changed:  $Date:  2002/05/29  13:45:18  $ 

Copyright  (C)  2002  Jason  Wm.  Mitchell,  All  Rights  Reserved. 

Restrictions:  released  under  the  Perl  Artistic  license 
Security:  unclassified 

This  software  is  0SI  Certified  Open  Source  Software. 

0SI  Certified  is  a  certification  mark  of  the  Open  Source  Initiative. 
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3.8  Testing 

To  test  the  numerical  integrators  presented  in  §  3.4  and  §  3.7,  we  require  a  system  of 
first-order  equations.  The  system  used  here  represents  an  harmonic  oscillator. 

3.8.1  Harmonic  oscillator 

The  interface  requirements  for  the  system  of  first-order  equations  have  already  been 
specified  in  §  3. 4. 2. 2  and  §  3. 7. 1.5. 

66a  (harmonic_oscillator  66a}  = 

(ho:  header  67a) 

#include  <cstddef> 

struct  harmonic_oscillator 

{ 

(ho:  report  number  of  equations  66b) 

(ho:  member-template  operatorQQ  66c) 

}; 

66b  (ho:  report  number  of  equations  66b)  =  (66a) 

static  size_t  size()  {  return(  2  ) ;  } 

From  §  3. 7. 1.5,  the  integrator  constructor  requires  a  static  method  named 
size()  that  reports  the  number  of  first-order  equations  as  a  size_t. 

66c  (ho:  member-template  operator()()  66c)=  (66a) 

template  <typename  T,  typename  VI,  typename  V2>  inline 
void  operator!) (  const  T&  x,  const  V1&  y,  V2&  ydot  )  const 
{ 

ydot  [0]  =  y  [1]  ; 
ydot  [1]  =  -y  [0] ; 

> 

From  §  3. 4. 2. 2,  invoking  the  system  of  first-order  equations  requires  a  signature 
given  by  the  above.  The  use  of  a  member-template  allows  the  flexibility  of  accepting 
differing  container  types  in  a  type-safe  manner.  Still,  these  containers  must  meet  the 
interface  requirements  for  use  in  this  method.  In  the  above,  we  only  require  that  VI 
and  V2  provide  random  access  operators,  and  have  elements  that  are  assignable  and 
possess  unary  minus.  Since  the  state  is  not  changed  by  invoking  this  method,  it  is 
const-qualified. 

In  terms  of  operation,  the  value  of  the  independent  variable  x  and  state  y  are 
passed  into  the  method,  and  the  programmed  derivatives  are  computed  stored  in 
ydot  for  return  to  the  caller. 

Regarding  calling  efficiency,  all  the  arguments  are  passed  by  reference  for  efficiency 
since  this  method  will  be  invoked  frequently. 
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3. 8. 1.1  Header 

67a  (ho:  header  67a)  =  (66a) 

//====================================================================== 

//  Project:  OTIC  technical  report  example  integrator  implementation. 

// 

//  Namespace:  <none> 

// 

//  Purpose:  Harmonic  oscillator  equations 

// 

//  $RCSfile:  pr-mains .  nw,v  $ 

//  $Revision:  1.5  $ 

// 

//  $State :  Exp  $ 

//  $Locker:  $ 

// 

//  $Source :  /home/mitchejw/work/research/tex/dtic/tr/RCS/pr-mains ,nw,v  $ 

// 

//  Comments: 


// 

// 

Orig.  Author: 

Jason  Wm.  Mitchell 

// 

US  Air  Force  Research  Laboratory 

// 

Air  Vehicles  Directorate,  AFRL/VACA 

// 

2210  Eighth  Street,  Bldg.  146,  Rm.  305 

// 

Wright-Patterson  AFB ,  OH  45433  USA 

// 

E-Mail: 

jason+dtic_report2002@maiar . org 

// 

Orig.  Date: 

04-May-2002 

// 

// 

Last  Changed: 

$Date :  2002/05/29  15:07:12  $ 

//  Copyright  (C)  2002  Jason  Wm.  Mitchell,  All  Rights  Reserved. 

//  Restrictions:  released  under  Perl  Artistic  license 
//  Security:  unclassified 

// 

//  This  software  is  OSI  Certified  Open  Source  Software. 

//  OSI  Certified  is  a  certification  mark  of  the  Open  Source  Initiative. 
//===================================================================== 

3.8.2  Fourth-order  Runge-Kutta  method 

Before  testing  the  numerical  integrator  presented  in  §  3.7,  we  must  test  the  fourth- 
order  Runge-Kutta  algorithm.  Using  the  set  of  harmonic  oscillator  equations  defined 
in  §  3.8.1,  we  construct  a  small  program  to  validate  its  operation. 

67b  (gmain.  cc  67b)  = 

(gm:  header  70) 
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( gm :  includes  69b) 

( preprocessor  check  for  M_PI  68a) 
int  mainQ 
{ 

using  namespace  std; 

(gm:  typedef  decls  68b) 

(gm:  declaration  block  68c) 

(gm:  integration  loop  69a) 

return (  0  ) ; 

} 

68a  (preprocessor  check  for  M_PI  68a)  =  (67b  71a) 

#ifndef  M_PI 

#error  "Try  #define  _X0PEN_S0URCE  500..." 

#endif 


Since  we  are  using  equations  for  an  harmonic  oscillator,  it  is  convenient  to  have 
access  to  the  frequently  provided  preprocessor  constant  M_PI.  The  preprocessor  flags 
that  enable  the  M_  category  of  constants  vary  between  compilers  and  so  we  provide  a 
minimal  check  as  well  as  a  suggested  preprocessor  flag  to  enable  them. 

68b  (gm:  typedef  decls  68b)  =  (67b) 

typedef  harmonic_oscillator  eqs_t; 

typedef  pr_cheby : : def ault_guesser<double>  guesser_t; 


These  two  declarations  provide  a  shorthand  for  the  descriptive  but  lengthy  types 
used  here. 

68c  (gm:  declaration  block  68c)  =  (67b)  68d> 

const  size_t  m  =  eqs_t : : size () ; 
const  double  y0[]  =  {  0.0,  1.0 
valarray<double>  y(y0,m),  y_new(m) ; 

The  first  of  the  declarations  creates  a  shorthand  for  the  number  of  first-order 
equations,  i.e.  2.  Next,  we  create  a  standard  double  array  for  the  initial  conditions. 
The  values  above  correspond  to  the  initial  conditions  y( 0)  =  0,  and  y'( 0)  =  1.  These 
initial  conditions  generate  the  solutions  y(x )  =  sinx,  y'(x)  =  cosx.  Knowing  this 
information  allows  us  to  compare  the  numerical  solution  to  an  exact  solution  for  error 
analysis.  Lastly,  these  initial  conditions  are  used  to  initialize  a  valarray  representing 
the  numerical  solution  vector.  A  second  valarray  is  constructed  to  hold  the  output 
values  from  the  integration. 
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68d  {gm:  declaration  block  68c) +=  (67b)  <68c 

const  size_t  p  =  200; 

const  double  m_2pi  =  M_PI  *  2.0; 

const  double  h  =  m_2pi  /  p; 

const  double  xf  =  m_2pi  *  100.0; 

double  x  =  0.0; 

double  u; 

guesser_t  rk4(m) ; 


Here,  we  choose  the  stepsize  for  the  test.  To  do  this,  we  divide  one  period  of  the 
motion  into  200  steps.  Since  the  period  is  27r,  this  gives  us  a  step  size  of  h  =  27r/200. 
With  h  defined,  we  elect  to  run  the  integration  for  100  periods  starting  from  xq  =  0. 

To  prevent  the  compiler  supplied  sin  and  cos  algorithms  from  suffering  error 
induced  by  large  input  arguments,  u  is  provided  to  store  the  unwound  independent 
variable  x. 

The  last  declaration  in  the  block  instantiates  a  def  ault_guesser  labeled  rk4. 

69a  {gm:  integration  loop  69a)  =  (67b) 

for(  size_t  k  =  1 ;  x  <  xf ;  k++  ) 

{ 

rk4(  x,  y,  h,  eqs_t(),  y_new  ); 
y  =  y_new; 
x  =  k*h; 
u  =  h  *  (k*/.p)  ; 

printf("7o  23.16e  °/0  23.16e  %  23.16e\n",  x,  y[0]-sin(x),  y  [1] -cos (x) )  ; 

> 

In  the  integration  loop,  the  value  of  y(x  +  h)  is  computed  and  stored  in  y_new. 
This  state  is  then  copied  to  y,  and  x  is  incremented  to  reflect  its  value  at  the  new 
state.  The  value  of  the  unwound  argument  u  is  computed  as  u  =  hmod(k.p). 

The  numerical  solution  is  then  compared  to  the  exact  solution,  and  that  difference 
is  output.  As  discussed  previously  in  §  3. 7. 2. 2,  C  style  output  is  used. 

3. 8. 2.1  Results 

Compiling  and  executing  this  test  produces  an  error  that  is  0(/i4)  for  the  duration 
of  the  integration  for  both  y  and  y' . 

3. 8. 2. 2  Includes  &  header 

69b  {gm:  includes  69b)  =  (67b) 

#include  <cstddef> 

#include  <cmath> 

#include  <cstdio> 
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#include  <valarray> 

#include  "def ault_guesser" 
#include  "harmonic_oscillator" 
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(gm:  header  7C))  = 


(67b) 


n 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

// 

n 


Project:  OTIC  technical  report  example  integrator  implementation. 
Namespace:  <none> 

Purpose:  Test  default  guess  generator. 

$RCSfile:  pr-mains . nw, v  $ 

$Revision:  1.5  $ 

$State :  Exp  $ 

$Locker:  $ 


$Source :  /home/mitchejw/work/research/tex/dtic/tr/RCS/pr-mains ,nw,v  $ 


Comments:  Just  a  quick  test  program  to  check  out  RK4  guesser: 

quick,  not  elegant. 


Orig.  Author: 


E-Mail: 
Orig.  Date: 
Last  Changed: 


Jason  Wm.  Mitchell 
US  Air  Force  Research  Laboratory 
Air  Vehicles  Directorate,  AFRL/VACA 
2210  Eighth  Street,  Bldg.  146,  Rm.  305 
Wright-Patterson  AFB ,  OH  45433  USA 
j  ason+dt ic_report2002@maiar . org 
02-Feb-2002 

$Date :  2002/05/29  15:07:12  $ 


Copyright  (C)  2002  Jason  Wm.  Mitchell,  All  Rights  Reserved. 
Restrictions:  released  under  Perl  Artistic  license 
Security:  unclassified 


This  software  is  0SI  Certified  Open  Source  Software. 

0SI  Certified  is  a  certification  mark  of  the  Open  Source  Initiative. 
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3.8.3  Chebyshev  integrator  of  degree  n  —  8 

Finally,  we  consider  a  main  for  testing  the  integrator  of  interest:  Chebyshev  of  degree 
n  =  8.  The  system  of  equations  used  to  verify  this  integrator  will  the  same  harmonic 
oscillator  equations  defined  in  §  3.8.1  used  in  the  previous  section. 

71a  (cmain.  cc  71a)  = 

(cm:  header  72c) 

(cm:  includes  72b) 

(preprocessor  check  for  M_PI  68a) 
int  mainQ 
{ 

using  namespace  std; 

(cm:  typedef  decls  71b) 

(cm:  declaration  block  71c) 

(cm:  integration  loop  72a) 

return (  0  ) ; 

} 

The  basic  layout  of  cmain.  cc  is  quite  similar  to  that  of  gmain.cc  defined  in 
§  3.8.2. 

71b  (cm:  typedef  decls  71b)  =  (71a) 

typedef  harmonic_oscillator  eqs_t; 

typedef  pr_cheby : : integrator<double , eqs_t>  integrators ; 

We  begin  by  providing  a  few  convenient  typedefs,  and  as  before  the  scalar  type 
used  is  double. 

71c  (cm:  declaration  block  71c)  =  (71a)  71d> 

const  size_t  p  =  64; 

const  double  m_2pi  =  M_PI  *  2.0; 

const  double  h  =  m_2pi  /  p; 

const  double  xO  =  0.0; 

const  double  xf  =  m_2pi  *  500; 

In  the  first  portion  of  the  declaration  block,  we  set  the  interval  and  the  stepsize.  In 
this  case,  we  are  only  considering  64  points  in  the  period,  rather  than  the  200  chosen 
for  the  Runge-Kutta  algorithm,  resulting  in  a  much  larger  stepsize.  In  addition, 
the  integration  is  performed  over  500  periods,  compared  to  the  100  periods  for  the 
Runge-Kutta  algorithm,  starting  from  xq  =  0. 

71d  (cm:  declaration  block  71c) +=  (71a)  <71c 

double  yO []  =  {0.0,  1.0}; 
valarray<double>  y(  yO,  eqs_t : : size ()  ); 
integrators  cheby8(  h,  eqs_t()  ); 
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With  the  interval  and  stepsize  selected,  the  initial  conditions  as  discussed  in  §  3.8.2 
are  set,  and  the  Chebyshev  integrator  cheby8  is  instantiated.  Note  that  since  the 
default  guessing  mechanism  is  used,  the  syntax  that  instantiates  cheby8  is  quite 
simple. 

72a  (cm:  integration  loop  72a)  =  (71a) 

double  u,  x  =  xO; 

for(  size_t  k  =  1;  x  <  xf;  k++  ) 

{ 

cheby8(  x,  y  ) ; 
x  =  k*h; 
u  =  h  *  (k°/.p) ; 

printf("°/0  23.16e  %  23.16e  %  23.16e\n",  x,  sin(u)-y[0],  cos (u) -y  [1] )  ; 

> 

Before  the  integration  loop  definition,  we  declare  the  unwound  angular  argument 
u,  and  the  independent  variable  x.  As  before,  the  argument  u  is  restricted  to  u  6 
[0,2vr). 

Within  the  integration  loop,  the  current  independent  variable  and  state  are  input 
into  cheby8()  ().  On  method  return,  the  new  state  y(x  +  h )  is  returned  in  y.  The 
independent  variable  x  is  then  incremented  accordingly.  The  current  value  of  x  is 
unwound  and  stored  in  u.  This  information  is  used  to  compare  the  current  numerical 
solution  to  the  exact  solution  given  in  §  3.8.2,  with  the  error  output  on  stdout. 

3. 8. 3.1  Results 

Compiling  and  executing  this  test  produces  a  maximum  error  over  the  interval  that 
is  on  the  order  of  the  unit-round  for  the  platform  chosen* * 7. 

3. 8. 3. 2  Includes  &  header 

72b  (cm:  includes  72b)  =  (71a) 

#include  <cstddef> 

#include  <cmath> 

#include  <cstdio> 

#include  <valarray> 

#include  "pr_cheby" 

#include  "harmonic_oscillator" 


72c  (cm:  header  72c)  =  (71a) 

//==================================================================== 

//  Project:  OTIC  technical  report  example  integrator  implementation 

7See  §  3.6.2. 
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// 

//  Namespace:  <none> 

// 

//  Purpose:  Driver  for  Chebyshev  integration  for  degree  n  =  8. 

// 

//  $RCSfile:  pr-mains . nw, v  $ 

//  $Revision:  1.5  $ 

// 

//  $State :  Exp  $ 

//  $Locker:  $ 

// 

//  $Source :  /home/mitchejw/work/research/tex/dtic/tr/RCS/pr-mains ,nw,v  $ 


// 

// 

Comments : 

// 

// 

□rig.  Author: 

Jason  Wm.  Mitchell 

// 

US  Air  Force  Research  Laboratory 

// 

Air  Vehicles  Directorate,  AFRL/VACA 

// 

2210  Eighth  Street,  Bldg.  146,  Rm.  305 

// 

Wright-Patterson  AFB,  OH  45433 

// 

E-Mail: 

jason+dtic_report2002@maiar . org 

// 

Orig.  Date: 

02-Feb-2002 

// 

Last  Changed : 

$Date :  2002/05/29  15:07:12  $ 

// 

//  Copyright  (C)  2002  Jason  Wm.  Mitchell,  All  Rights  Reserved. 

//  Restrictions:  released  under  the  Perl  artistic  license 
//  Security:  unclassified 

// 

//  This  software  is  OSI  Certified  Open  Source  Software. 

//  OSI  Certified  is  a  certification  mark  of  the  Open  Source  Initiative. 
//===================================================================== 
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Intra-nodal  points 


The  following  tables  contain  the  intra-nodal  point  locations,  Eq.  (1.2)  for  even  degrees 
2  <  n  <  14.  For  each  degree,  the  intra-nodal  point  locations  are  given  as  multiples 
of  a  method’s  fixed  stepsize  h.  i.e.  hj  =  h£j.  The  values  for  £o  and  £n  are  not  shown 
in  the  following  since  their  values  are  0  and  1,  respectively. 

When  possible,  all  numeric  quantities  in  the  following  tables  have  been  repre¬ 
sented  as  rational  functions  of  nested  roots.  Unfortunately,  this  explicit  form  is  not 
always  obtainable  in  general,  so  we  must  consider  an  implicit  symbolic  representa¬ 
tion  of  these  numbers,  something  Mathematica®  terms  algebraic  numbers 1 .  These 
numbers  have  the  property  that  applying  algebraic  operations  on  them  results  in  a 
single  algebraic  number.  They  are  written  Root[g,  k]  meaning  the  kth  root  of  the 
polynomial  equation  g{x)  =  0.  For  example,  Root[5  —  2  # l3,  2]  represents  the  second 
root  of  2x 3  —  5  =  0,  where  #1  is  the  Mathematica®  notation  for  a  polynomial 
variable  of  interest.  This  requires  a  unique  ordering  of  the  roots  to  be  meaning¬ 
ful.  Mathematica®  orders  roots  by  magnitude  except  that  real  roots  come  before 
complex  ones,  and  complex  conjugate  pairs  are  adjacent. 

The  intra-nodal  information  presented  in  the  following  tables  are  common  for 
both  families  of  implicit  Chebyshev  methods. 

Table  A.l:  Intra-nodal  points  £j,  n  =  2. 


3 

1 

i 

2 

1See  Wolfram  [10,  §  3.4.3]. 
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Table  A. 2:  Intra-nodal  points  n  =  4. 
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CO 
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4 

2 

1 

2 

Table  A. 3:  Intra-nodal  points  £j,  n 

=  6. 
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4 
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1 

2 

Table  A. 4:  Intra-nodal  points  £j,  n 

=  8. 
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3 

to 
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to 
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4 

4 

4 

1 

2 
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Table  A. 5:  Intra-nodal  points  £j,  n  =  10. 
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7 
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3 
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8 
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Table  A. 6:  Intra-nodal  points  . 

n  =  12. 

3 

6 

3 

Zj 

1 

1 

1 

7 

i-Vz  +  Vg 

8 

8 
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5 
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11 
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8 

8 

( continues ) 
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Table  A. 6:  Intra-nodal  abscissa  £j,  n  =  12.  (continued) 


(continues) 
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Table  A. 8:  Algebraic  numbers,  n  =  14.  ( continued ) 


I 

ct 

3 

Root[-l  -  4#1  +  4#12  +  8#13,  3] 

4 

Root  [—7  +  56  #12  -  112  #14  +  64#16,  5] 

5 

Root[l-4#l-4#l2  +  8#l3,  3] 

6 

Root[-7  +  56#l2  -  112#14  +  64#16,  6] 
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Coefficients  for  first-order 
methods 


In  the  following  tables,  exact  coefficients  for  a  family  of  implicit  Chebyshev  methods 
for  the  numerical  integration  of  first-order  differential  equations  are  given.  These 
coefficients  for  even  degrees  2  <  n  <  14  are  used  to  recast  Eq.  (1.5),  such  that 


where 


y{x  +  hij)  =y(x)  +  Ij , 


Ij  =  hdj^2wjkf(xk), 
k  =  o 


(B.l) 

(B.2) 


where  dj  represents  a  common  denominator  for  each  expression. 

The  constants  eg  appearing  in  Table  B.7  are  defined  in  Appendix  A,  Table  A. 8. 

Table  B.l:  Integral  approximation  I,  for  n  =  2. 


dj  5  Wj  k 

Expression 

Wjk 

Expression 

di 

1 

24 

Wfil 

8 

Wifi 

5 

Wl,2 

-1 

d2 

1 

6 

W2,l 

4 

W2,0 

1 

W2,2 

1 
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Table  B.2:  Integral  approximation  Ij  for  n  =  4. 


dj  5  Wj  k 

Expression 

Wjk 

Expression 

di 

1 

480 

Wfi  2 

24  ^4  —  3  y/2) 

Wifi 

23  +  4 1/2 

Wl)3 

64  —  43  y/2 

wi,i 

64  -  13 

U+4 

—7  +  4  y/2 

1 

120 

W2,2 

24 

W-lfi 

2 

W2,3 

16-  15\/2 

w2, 1 

16  +  15^ 

W2, 4 

2 

d3 

1 

480 

W3,2 

24  ^4  +  3  y/2) 

w3fi 

23  —  4 i/2 

W3,3 

64  +  13 

W3,l 

64  +  43  y/2 

W3,4 

% 

1 

b- 

1 

di 

1 

30 

W4,2 

12 

Wifi 

1 

W4fi 

8 

tW4,l 

8 

W4, 4 

1 
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Table  B.3:  Integral  approximation  Ij  for  n  =  6. 


dj  5  Wj  k 

Expression 

Wjk 

Expression 

di 

1 

Wifi 

2624  -  1488 

20160 

Wifi 

424  +  72  Vs 

Wifi 

2339  —  1368  Vs 

wi,i 

1280  —  235  Vs 

Wifi 

1280  -  725  VS 

Wifi 

2269  —  1368 

Wifi 

—136  +  72 

d2 

1 

W2fi 

-368 

20160 

W2, 0 

72 

W2fi 

207 

W2,l 

5  (296  +  189  Vs) 

W2fi 

1480  -  945  VS 

W2fi 

2097 

W2fi 

72 

^3 

1 

W3fi 

328 

2520 

W3,0 

53 

W3fi 

-62 

W3,l 

10  (l6  +  7  Vs) 

W3fi 

160  -  70 

U>3,2 

638 

W3fi 

-17 

di 

1 

Wifi 

624 

2240 

Wifi 

24 

Wifi 

279 

( continues ) 
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Table  B.3:  Integral  approximation  Ij ,  n  =  6.  ( continued ) 


dj  i  Wj  k 

Expression 

Wjk 

Expression 

W4,l 

15  (8  +  7  V3) 

Wifi 

3  (40  -  35  y/z) 

m,  2 

489 

Wifi 

24 

d§ 

1 

20160 

W5,3 

2624  +  1488 

w5,o 

424  -  72 

W5,4 

2339  +  1368 

W5, 1 

5  (256  +  145  V3) 

W5,5 

5  (256  +  47^) 

yj5,2 

2269+  1368  V3 

W5fi 

—8  (17  +  9^) 

de 

1 

630 

We, 3 

164 

w6,o 

9 

We,  4 

144 

w6,i 

80 

W6,5 

80 

U>6,2 

144 

we,e 

9 

Table  B.4:  Integral  approximation  Ij  for  n  =  8. 

dj  •>  ^ j  k 

Expression 

d\ 

1 

40320 

Wifi 

475  +  80  \J 2  +  v/2 

( continues ) 
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Table  B.4:  Integral  approximation  Ij ,  n  =  8.  ( continued ) 


dj  ‘  VJjk 


Expression 


U+2 


W  1,4 


W  1,8 


Wl^  2560  -  768  V2  +  126  I  -  2  V2  -  210  \jl  -  V2 

-  715  \J2+V2  +  330  y4  ^2  +  V2) 


1155  -  16  ^—71  +  42  \J2-V2  +  80  ^2  +  ^ 


^1.3  768  —  126  \Ja~2  \[2 

+  5  ^512  +  105  \J2-V2  -  206  ^2  +  ^2  -  150  ^ 2  (2  +  y/fj 


32  ^124  +  42  \J2-V2-  85  ^2  +  ^2 


Wl*  768  V2  +  294  \]l  —  2  V2 

-5  ^-512+105^2-^+  290^2  +  ^+66^2  (2  + 

-1155  v^-16  ^—281  +  42  \] 2  -  V2  +  80  y/2+V^j 


-768v/2-294  \Jl-2V2 

+  5  ^512  +  T2\J  2  —  -\/2  —  353  \J 2  +  \/2  +  150  2  (2  +  ^ 


5  ^-31+16^2  +  ^ 


^2,0 


W2,l 


10080 


-20  (-2  + 


1168  -  512  V2  +  105  \J2-V2  +  210  ^2+ 


( continues ) 
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Table  B.4:  Integral  approximation  Ij ,  n  =  8.  ( continued ) 


dj  i  Wjk 


Expression 


704  -  58  V2 


—128  V2  +  7  (  16  +  30  V2-\/2-  15  \/2+v/2 


992  —  664  \/2 


—128  V2  +  7  (16-30  J2-V2  +  15  C2+V2 


704  -  478  \/2 


1168  -  512  V2  -  105  V  2  -  -  210  V  2  +  y/2 


-20  (  —2  +  V2 


40320 


475  +  80  \/2-V2 


w3,i  2560  —  768  -\/2  +  330  y  4  —  2  \/2  —  1450  y  2  —  \/2 

+  525  \/ 2  +  V2  +  294  ^  1 2  (2  +  V2) 


1155  v^+  16  (  281  -  80  \/2  -  V2  +  42  \  2  + 


W3'3  2560  +  768v/2-  330  y/4-2v/2-715y/2- 

+  210V/2+V/2+126i/2  7 2  +  v'if) 


85 


APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.4:  Integral  approximation  X,-,  n  =  8.  ( continued ) 

dj  5  Wj  k 

Expression 

W3A 

-32  (^-124+85^2-^+42^2+ 

W3,5 

768  -  294  2  (2  +  v7^) 

-  5  ^—512  +150  \Jl-2V2  +  353  ^2  -  v7!?  +  42  1/2  +  v7^ 

W  3,6 

-ii55\/2  +  i6  (71-801/2-^  +  42^2  +  ^ 

W3,7 

2560  -  768  +  750  \/4  -  2  -  1030  \J2-V2 

-  525  ^2  +  -  126  ^2  (2  +  v7^) 

W3,8 

5  ^—31  +  16  a/2  —  \/2 j 

dj 

1 

2520 

^4,0 

10 

W4,l 

—48  v7^  +  5  (^32  -  21  ^2  -  v7^  +  21  ^2  + 

W4,2 

176  +  105  V2 

^4,3 

48 v7^  +  5  ^32  +  21i/2-\/2  +  21i/2  +  \/2^ 

W4,4 

248 

^4,5 

48  -\/2  —  5  ^-32  +  2\\J  2  —  V2  -\-21\J  2  +  V^j 

( continues ) 
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Table  B.4:  Integral  approximation  Ij ,  n  =  8.  ( continued ) 


dj  ■  Wjk 


Expression 


W4,6 


176  —  105  \f2 


W4,7 


^4,8 


W  5,0 


W5,2 


W5,4 


^5,6 


-48  V%  +  5  ^32  +  21  \J  2-V2  -  21  \J  2  + 


10 


1 


40320 


475  -  80  \J2-V2 


w5,i  2560  -  768  V2  -  750  \J I  -  2  V2  +  1030  \j 2-V2 

+  525  \J2  +  V2  +  126  y4  (2  +  V2) 


1155  V2  +  16  ^281  +  80  \J2-V2  -  42  ^2+^2 


ws,3  2560  4-  768  V2  +  750  \]a  —  2  V2  +  1765  \j 2-^/2 

+  210  \J 2+  V2  +  294  (2  +  y/2) 


32  ^124  +  85  \J2-V2  +  42  ^2  + 


w5,5  2560  +  768  V2  +  330  \J I  -  2  V2  +  715  ^2  -  V2 

-  210  \J 2+  V2  -  126  y4  (2  +  V2) 


-1155  v^+16  ^71  +  80  \J2-V2  -  42  y/ 2  +  V^j 


( continues ) 
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Table  B.4:  Integral  approximation  Ij,  n  =  8.  ( continued ) 


dj ,  Wjk  Expression 


2560  -  768  V2  -  330  \Jl-2V2  +  1450  \J  2~V2 


-  525  ^2+^-294^2  (2  +  V7!?) 

W  5,8 

-5  ^31  +  16^2--^ 

C?6 

1 

10080 

^6,0 

20  (2  +  V2) 

W6,l 

128 V2  +  7  (l6+15\/2- V2  +  30\j2  +  V2^J 

W6,2 

704  +  478  V2 

W6,3 

1168  +  512  +  210  \J2  -  -  105  \J 2  +  V2 

W6,4 

992  +  664  \pl 

W  6,5 

1168  +  512  V2  -  210  \J2  -  V2  +  105  \J 2  +  V2 

W  6,6 

704  +  58  V2 

W  6,7 

128  V2  —  7  ^-16+15  V^-v^+SOy^+v^ 

W6,8 

20  (2  +  y/2) 

d7 

1 

40320 

( continues ) 
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Table  B.4:  Integral  approximation  Ij ,  n  =  8.  ( continued ) 


dj  ■  Wjk 


Expression 


W7,0 


475  -  80 


w7,i  -768  V2  +  294  \]\-2^2 

+  5  ^512  -  42  \J2-V2  +  353  ^2  +  ^2  -  150  (2  +  W) 


w7,2 


W7,4 


^7,6 


^7,8 


1155  V2  +  16  ^71  +  42  \j 2  —  ~\pl  +  80 \fl  +  sM 


w 7-3  2560  +  768  -  294  ^4-  2v/2  +  525  \J2-V2 

+  1450  \J 2  +  V2  +  330  y/2  (2  +  V2) 


32  ^124  -42y/,2-v/2  +  85v/,2  +  v/2 


w7,s  768  +  126  \J4-2V2 

+  5  ^512  -  105  \J2-V2  +  206  ^2  + +  150  ^2  (2  +  V^j 


—1155  V2  +  16  ^281  +  42  \J2-V2  +  80  ^2+^ 


w7,7  2560  -  768  \/2  -  126  1/4  -  2  +  210  ^2  -  V2 

+  715  \J 2  +  V2  -  330  y4  (2  +  ^) 


-5  ^31  +  16^2  +  ^ 


1 

630 


^8,0 


( continues ) 
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Table  B.4:  Integral  approximation  Ij ,  n  =  8.  ( continued ) 


di 

Wifi 

Wl,l 

( continues ) 
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Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


( continues ) 
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Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


dj  5  Wj  k 

Expression 

d2 

1 

8870400 

W2,0 

-5600  (-3  +  Vb) 

W2,l 

388096  -  58496  Vb  +  28875  ^50  -  10  Vb  -  28875  \J  lO-2Vb 

+  86625  ^ 

2  ^5  +  Vb)  —  17325  10  (5  +  Vb) 

W2,2 

521450  —  72690  Vb 

W2, 3 

80096  —  51104  Vb  — 

17325  y^50  —  10  Vb  +  86625  \JlQ-2Vb 

+  28875  ^ 

J2  (5  +  Vb)  -  28875  ^JlO  (b  +  V5) 

W2,4 

130  (415  -  87  Vb) 

W2,5 

-192  ^—3873  +  1775  Vb) 

W2fi 

400450  -  173010  Vb 

W2,7 

80096  -  51104  Vb  +  17325  \] 50  -  10  -  86625  \/l0  -  2  Vb 

-  28875  ^ 

j2  (5  +  +  28875  ^10  (5  +  Vb) 

W2, 8 

636950  -  280590  Vb 

W2, 9 

388096  -  58496 \/5 

-  28875  ^50  —  10  Vb  +  28875  \JlQ-2Vb 

-  86625  y 

2  ^5  +  Vb)  +  17325  ^10  (5  +  Vb) 

( continues ) 
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Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


dj  i  Wjk 


Expression 


-5600  -3  +  V5 


8870400 


224  (  298  +  25  A/ 10 -2^ 


w3,i  386048  -  78848  Vb  +  16555  50  -  10  Vb  -  95515  \/ 10  -  2  Vb 

+  47289  +  +  10395  «/l0  (Wv^i 


^3,2  779226  +  51326  v/5  +  30800  V  50- 10 

-  142800  J 10—2  -\/5  +  26400  JlO  (h  + 


w3,3  386048  +  78848  -  14245  \J 50  -  10  Vb  -  48391  10  -  2  Vb 

+  20955  1/2  f5  +  v/5)  +  8085  J 10  ( 5  +  v7!^ 


w3,4  526974  +  48466  V5  —  30800  y  50  —  10  V5 

-  142800  J 10—2  -\/5  -  26400  ,  llO  (5  + Vb] 


-192  —3624  +  1085  v/10  —  2  \/5  +  220  <  / 2  ( 5  +  vV) 


w3,e  548226 +  64174^ -  30800  V  50-10^ 


—  142800  A/ 10  —  2  —  26400  1  / 10  ( 5  +  vT) 


w3,7  386048  +  78848  -  35035  y  50  -  10  -  121849  y  10  -  2  Vb 

+  165  ,/7^W^)-  8085  ,/l0  (W  v7!^ 
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dj  j  ^jk 


Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


Expression 


U>4,2 


U>4,4 


W+5 


W+6 


W3.8  295974  -  163966  V5  +  30800  \Z50-10V5 

-  142800  \J  10—2  -\/5  +  26400  ^10  (5  + 


w3,9  386048  -  78848  +  32725  ^50-  10  -  74725  \]  10-2^ 

-  26169  ^2  ^5  +  V5)  -  10395 


w  340 

224 

^-98  +  25^10-2^ 

4 4 

1 

354816 

^4,0 

-224  ^—5  +  VE'j 

W4,l 

27680  —  8352  V5  —  1155  ^ 

/ 50  -  10  VE  -  1155  a/  10  -  2  VE 

+  3465  ^2 

(5  + VE'j  +  693  y'lo  (5  +  VE) 

40850  —  4958  y/E 


W4’3  3968  Vb  +  3  ^5120  +  231  ^50  -  10  VE  +  1155  \/l0  -  2  VE 

+  385  2  (5  +  75)  +  385  ^10  (5  +  v/5)'j 


22150  +  1598  VE 
25920  -  13632 V5 
17530  —  6718  VE 


( continues ) 
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Table  B.5:  Integral  approximation  Ij,  n  =  10.  ( continued ) 


dj  j  ^  'jk 


Expression 


w4,r 

^4,8 

W4,9 

W4, 10 

G?5 

^5,0 

^5,1 

W5,2 

^5,3 

^5,4 

^5,5 

^5,6 


3968  V5-3  ^-5120  +  231  ^O-lOv^  +  1155  \J\D-2VE 
+  385  yj 2  (5  +  V5)  +  385  ^10  (5  +  j 

26990  -  11426  VE 

27680  -  8352  VE  +  1155  ^50-  lOv^  +  1155  \j  10  —  2  V5 
-  3465  ^2  (5  +  VE)  -  693  ^JwJ^+Vt) 

—224  (-5+ 

1 

138600 

1043 

6032  -  1232  VE  -  1155  \/l0  —  2  VE  +  1386  ^2~(V+Vt) 

5859  +  3509  VE 

6032  +  1232  VE  +  1386  \JlQ-2VE  +  1155  ^2  (5  + 

10941  +  5269  VE 

10872 

5859  -  3509  VE 

( continues ) 
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Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


dj  5  Wj  k 

Expression 

W5,7 

6032  +  1232  V5  -  1386  \JlQ-2\/b-  1155 

\j 2  (5  +  \/5) 

W5,8 

10941  —  5269  VE 

W5,9 

6032  -  1232  VE  +  1155  \J  10  —  2  V5  —  1386 

\j 2  (5  +  \/5) 

W5,10 

-343 

dg 

1 

8870400 

W6,0 

5600  (^3  +  VE) 

W  6,1 

80096  +  51104  VE  -  28875  ^50  -  10  VE  -  28875  y 

^io  -  2  VE 

+  86625  ^2  (5  +  VE^  +  17325  ^10  (5  + 

W6,2 

400450 +  173010  V5 

W  6,3 

388096  +  58496  VE  +  17325  ^50  -  10  VE  +  86625  ' 

\jlQ-2VE 

+  28875  ^2  (5  +  +  28875  ^10  (5  + 

^6,4 

10  (63695  +  28059  v7!^ 

^6,5 

192  (3873  +  1775  v7^) 

^6,6 

521450  +  72690  VE 

( continues ) 
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Table  B.5:  Integral  approximation  Ij,  n  =  10.  ( continued ) 


( continues ) 
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dj  j  ^jk 


Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


Expression 


W/,5 


W7  10 


W  8,0 


192  ^3624  +  1085  \jlD-2Vb  +  220  y4  (5  + 


w7,6  548226  +  64174  V5  +  30800  ^50  -  10  Vb 

+  142800  \J  ID  —  2  \/5  +  26400 


w7,r  386048  +  78848  V5  +  14245  ^50  -  10  V5  +  48391  \J  10  -  2 

i  y4  (W  -  8085  ^10  (5  +  VS) 


-  20955 


u;7.8  295974  -  163966  VE  -  30800  ^50  -  10  V5 

+  142800  \J  10-2VZ  -  26400  ^JlO~(V+Vtj 


w7,9  386048  -  78848  V5  -  16555  ^50  -  10  V5  +  95515  \/ 10  -  2  V5 

'  y4  (5  +  Vb)  -  10395  10  (s  +  Vs) 


-  47289 


-224  ^98  +  25  10-2V5 


1 


354816 


224  (5  +  V5 


ws,i 


U>8,2 


-3968 


V5  +  3  ^5120  +  385  ^50  -  10  -  385  ^10  -  2 

+  1155  y 2  (5  +  -  231  y/lO  (W  v7!^ 


17530  +  6718  \/5 


( continues ) 
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Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


dj  i  Wjk 


Expression 
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Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


( continues ) 
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Table  B.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


dj  5  Wj  k 

Expression 

dio 

1 

34650 

UJl0,0 

175 

Wios 

3016-  616  Vb 

UJlO,2 

4200  -  440  V5 

UJl0,3 

3016  + 616  V5 

UIW,4 

40  (l05  +  11  Vtj 

W  10,5 

5436 

^10,6 

40  (l05  +  11  Vtj 

UJl0,7 

3016  + 616  V5 

U>10,8 

4200  -  440  V5 

^10,9 

3016-  616  V5 

^10,10 

175 
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Table  B.6:  Integral  approximation  Ij  for  n  =  12. 


dj  i  Wj  k 

Expression 

di 

1 

69189120 

Wi,0 

1680  ^215+  18\/2  +  18  V^j 

wlti 

—101677  V2  -  97361  V6  -  2048  (-1346  +  455  Vtj 

Wifi 

-22  (-162392  +  38624  V2  +  33033  V3  +  20736  \/6) 

Wifi 

997421  V2  -  1040303  V&  -  2048  (-1346  +  455  Vtj 

Wifi 

-22  (-44456  +  38624  V2  -  33033  V3  +  20736  y/6 ) 

Wifi 

-16  (-199744+  4261  V2  +  78192 

Wifi 

-6  (-1027709  +  248256  V2  +  216216  V3  +  124704  V(f) 

Wl,7 

-1833043  V2  -  720529  V&  +  2048  (l346  +  455  Vs) 

Wifi 

64  (70808  +  4117  V2  -  31347  V& ) 

Wifi 

-1202413  V2  -  1086895  V&  +  2048  (l346  +  455  v^) 

Wifio 

6  (280963  -  248256  \f2  +  216216  -  124704  \/£) 

Wifil 

-16  (-199744+  130387^2  +  6120^) 

tWl,12 

1680  (-71  +  18  V2  +  18  Vtj 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

d2 

1 

69189120 

W2,0 

-60480  (-2  +  V3) 

W2,l 

5115328  +  519519 \/2  -  2136256  Vs  +  291291  V6 

U>2, 2 

2275328  —  1293534  V3 

W2,3 

5115328  -  519519  -  2136256  -  291291  V6 

W2,4 

2275328  —  176418 

W2,5 

-32  (-99872  +  3003  +  60804 

W2,6 

54  (73705  -  40928  Vs) 

U>2,7 

397888  -  519519  V2  -  272576  V3  +  291291  V6 

W2,8 

128  (35404  -  20133  VS) 

W2,9 

397888  +  519519  V2  -  272576  V3  -  291291  V6 

W2,10 

54  (71703  —  40928  Vs) 

W2.ll 

32  (99872  +  3003  V2  -  60804 

W2.12 

-60480  (-2  +  VS) 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

d3 

1 

4324320 

^3,0 

105  (215  +  36  W) 

W3,l 

172288  -  78878  V2  -  58240  +  62972  V6 

W3,2 

176  (808  +  79  \/2  -  546 

W3,3 

172288  -  114914  V2  -  58240  +  38948  V& 

^3,4 

176  (808  +  79V2  +  546  Vtj 

W3,5 

199744  —  11525  V2 

W3>6 

233364  -  186192 V2 

W3,7 

172288  -  114914  V2  +  58240  -  38948  V6 

W3,8 

283232  -  207304 V2 

W3,9 

172288  -  78878  +  58240  Vz  -  62972  V6 

1^3,10 

257388  -  186192 V2 

«>3,11 

199744  -  137651 V2 

1^3,12 

105  (-71  +  36\/2 ) 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

d,4 

1 

69189120 

^4,0 

60480 

W4,l 

417344  +  567567  V2  +  495040  V3  + 

243243  \/6 

W4,2 

2098624  —  1135134  V3 

W+,3 

417344  -  567567  V?  +  495040  V3  - 

243243  V6 

W4,4 

22  (95392  +  51597 \/3) 

^4,5 

32  (109996  +  81081^) 

^4,6 

3746790 

w4,r 

417344  -  567567  V2  -  495040  V3  + 

243243  V6 

^4,8 

343936 

^4,9 

417344  +  567567  y/2  -  495040  V3  - 

243243  V6 

W4,10 

179226 

«>4,11 

32  (l09996  -  81081  V2J 

W4,12 

60480 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

C?5 

1 

69189120 

W  5,0 

-1680  (-215  +  18  \/2  -  18  VE^j 

^5,1 

1833043  V2  -  720529  VE  -  2048  (-1346  +  455  Vs) 

W5,2 

22  (44456  +  38624  V2  -  33033  VE  -  20736  VE^ 

^5,3 

1202413  V2  -  1086895  VE  -  2048  (-1346  +  455  Vtj 

^5,4 

22  (l62392  +  38624  VE  +  33033  -  20736  \/5) 

^5,5 

16  (l99744  +  130387  VE  —  6120 

W  5,6 

6  (1027709  +  248256  VE  +  216216  VE  -  124704  VEj 

W5,7 

101677  VE  -  97361  VE  +  2048  (l346  +  455  Vtj 

W5,8 

-64  (-70808  +  4117  VE  +  31347  VE') 

W5,9 

-997421  VE  -  1040303  VE  +  2048  (l346  +  455 

^5,10 

6  (280963  +  248256  VE  -  216216  -  124704  VE'j 

■^5,11 

16  (l99744  +  4261  VE  -  78192 

«>5,12 

-1680  (71  +  18  VE  -  18  VE) 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

de 

1 

1081080 

We,0 

1890 

W6,l 

43072  -  21021  \/2  -  14560  V3  +  21021  V& 

we, 2 

35552  -  18018  V3 

we, 3 

43072  +  21021  V2  -  14560  V3  -  21021  V& 

we,  4 

22  (i6i6  +  819  \/3) 

we, 5 

49936  +  39039  V2 

we,e 

115398 

we, 7 

43072  +  21021  V2  +  14560  V3  +  21021  V& 

we, s 

70808 

we, 9 

43072  -  21021  +  14560  V3  -  21021  V6 

w6, 10 

7290 

«>6,11 

49936  -  39039  V2 

1^6,12 

1890 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

d7 

1 

69189120 

7^7,0 

1680  ^215  +  18-^2-  18  \/(f) 

77>7,1 

-1202413  V2  +  1086895  V6  -  2048  (-1346  +  455 

77>7,2 

-22  (-44456  +  38624  y/2  +  33033  V3  -  20736  V6) 

W7,3 

-1833043  V2  +  720529  -  2048  (-1346  +  455  Vtj 

W7A 

22  (l62392  -  38624  V2  +  33033  +  20736  \/5) 

W7,5 

16  (l99744  -  4261  V2  +  78192 

7^7,6 

6  (1027709  -  248256  V2  +  216216  \/3  +  124704  Vtf) 

7777,7 

997421  V2  +  1040303  V6  +  2048  (l346  +  455 

7777,8 

64  (70808  +  4117  V2  +  31347 

7777,9 

-101677  V2  +  97361  V6  +  2048  (l346  +  455  Vtj 

7^7,10 

6  (280963  -  248256  V2  -  216216  +  124704  V6j 

TT’7,11 

16  (l99744  -  130387  \/2  +  6120  V&) 

7^7,12 

1680  (-71  +  18  V2  -  18  \/6) 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

d$ 

1 

2562560 

w  8,0 

6720 

Ws,l 

3  1 

(62912  +  7007  V2  -  29120  +  3003 

W8,2 

3  (30272  —  14014  \/3^J 

W  8,3 

-3  | 

(-62912  +  7007  V?  +  29120  +  3003  Vo} 

^8,4 

66  (l376  +  637 

W8,5 

96  (ll08  +  1001  V2j 

^8,6 

284178 

W8,7 

3  1 

(62912  -  7007  V?  +  29120  +  3003  Vtj 

W8,8 

322944 

W  8,9 

3  1 

(62912  +  7007  V?  +  29120  -  3003  s/& ) 

«>8,10 

152046 

«>8,11 

106368  -  96096  %/2 

«>8,12 

6720 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

dg 

1 

4324320 

w  9,0 

22575  —  3780  V2 

W9,l 

2 

(86144  +  57457  V2  -  29120  Vs  -  19474 

Wg,2 

-176  (-808  +  79  V2  +  546 

W  9,3 

2 

(86144  +  39439  -  29120  -  31486 

^9,4 

176  (808  -  79V2  +  546  Vtj 

199744+ 137651 

^9,6 

233364+  186192  V2 

W  9,7 

2 

(86144  +  39439  V2  +  29120  +  31486 

W  9,8 

283232 + 207304 V2 

W  9,9 

2 

(86144  +  57457  V2  +  29120  +  19474 

W9,10 

257388 + 186192 V2 

Wg.n 

199744  +  11525  V2 

«>9,12 

-105  (71  +  36^) 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

dio 

1 

69189120 

UJl0,0 

60480  (^2  +  Vs) 

Wio,l 

397888  +  519519  Vi  +  272576  V3  +  291291  V& 

UJlO,2 

22  ^103424  +  8019  VS) 

Wl0,3 

397888  -  519519  V 2  +  272576  V3  -  291291  \/6 

UIW,4 

22  (103424  +  58797 

W  10,5 

32  (99872  -  3003  V 2  +  60804 

Wio,6 

54  (73705  +  40928  V3) 

Wiot7 

5115328  -  519519  V2  +  2136256  Vs  +  291291  V& 

Wiot8 

128  (35404  +  20133  Vs) 

uJio,g 

5115328  +  519519  V2  +  2136256  Vs  -  291291  V6 

Wio,10 

54  (71703  +  40928  Vs) 

toio.n 

32  (99872  +  3003  V2  +  60804 

Wio.12 

60480  (2  +  VS) 

( continues ) 


111 


APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij ,  n  =  12.  ( continued, ) 


dj  5  Wj  k 

Expression 

du 

1 

69189120 

Wllfi 

—1680  (-215  +  18  y/2  +  18 

Wns 

-997421 V2  +  1040303  V&  -  2048  (-1346  +  455  Vsj 

w  11,2 

22  (l62392  +  38624  V2  -  33033  +  20736 

Wu>3 

101677  V2  +  97361  V&  -  2048  (-1346  +  455  Vtj 

Wll,4 

22  (44456  +  38624  V?  +  33033  Vz  +  20736 

Wllt5 

16  (199744  +  130387  V2  +  6120 

Wlifi 

6  (1027709  +  248256  V2  -  216216  V3  +  124704 

Wll,7 

1202413  V2  +  1086895  V&  +  2048  (l346  +  455 

tUll,8 

64  (70808  -  4117  V2  +  31347 

«>11,9 

1833043  V2  +  720529  y/6  +  2048  (l346  +  455 

Wnso 

6  (280963  +  248256  \f2  +  216216  +  124704  V5) 

Wll,ll 

16  (l99744  +  4261  V2  +  78192  V6j 

Wll,l2 

-1680  (71  +  18 \/2  +  18 \/6) 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

di2 

1 

270270 

Wl2,0 

945 

Wl2,l 

21536  —  7280  Vs 

W  12,2 

17776 

Wl2,3 

21536  —  7280  y/3 

U>12,4 

17776 

W\2,5 

24968 

Wl2fi 

30672 

W  12,7 

16  (l346  +  455  Vtj 

Wl2,8 

35404 

Wl2,9 

16  (l346  +  455  y/tj 

W12.10 

30672 

Wl2.ll 

24968 

W12.12 

945 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.7:  Integral  approximation  Ij  for  n  =  14. 


dj,Wjk  Expression 

di  _ I _ 

10090080 

u+o  132  (293  +  98  eg) 

u+i  143  ci  (-64  + 119  c2)  +  7  (-28  (-1848  +  208  c3  +  429  c4  + 1200  c5) 
+  13  (11  c2  (-21  +  22 c3)  +  6  c4  (61  c3  +  115  c5))) 

+  66  (-3027  + 2765  c5)  c6 


wh2  -105105  ci2  +  286  c3  (-817  +  392  c2  +  294  c5) 

+  294  ci  (344  +  429  c3  +  520  c4  -  1320  c6) 

+  49  (26  c5  (-32  +  88  c2  -  120  c4  +  165  c5)  -  231  (-33  +  32  c6)) 

wh3  -2002  c2  (42  +  43  c3  -  91  c5)  +  1568  (231  +  26  c5) 

+  390  c4  (-407  +  161  c5)  -  105  d  (2240  +  832  c4  -  3025  c6) 

-  379533  c6  +  286  c3  (32  +  189  c6) 

u>ii4  91  ci  (2819  +  1232  c2  +  231  c3  —  1680  c4  —  2310  C5) 

+  21  c3  (-13539  +  6006  c3  -  7280  c4  +  18480  c6) 

-  11  (26  (593  +  392  c2  -  735  c5)  c5  +  21  (-1487  +  1568  c6)) 

1^1,5  143  ci  (—64  +  329  c2)  —  1001  c2  (—21  +  86  c3) 

+  98  (3696  -  416  c3  +  858  c4  +  1443  c3  c4) 

-  210  (1120  +  1131  c4)  c5  +  66  (-7837  +  7315  c5)  c6 

wifi  637  ci  (—229  +  176  c2  —  33  c3  —  240  c4  +  330  C5) 

-  147  c3  (1403  +  858  c3  +  1040  c4  -  2640  c6) 

-  11  (26  c5  (-817  +  392  c2  +  735  c5)  +  1029  (-33  +  32  c6)) 


w i,r  9152  c3  +  390  c4  (407  -  609  c5) 

+  2002  c2  (42  +  11  c3  -  59  c5)  +  1568  (231  +  26  c5) 

-  105  ci  (2240  +  832  c4  -  3311  c6)  -  693  (487  +  78  c3)  c6 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  5  Wj  k 

Expression 

Wl,8 

169598  c3  +  7  (21632 c5  +  33  (1487  -  1568 c6)) 

+  7  (15015  ci2  +  182  (88  c2  (c3  +  c5)  -  3  c5  (22  c3  +  40  c4  +  55  c5)) 

-  6  ci  (-9272  +  3003  c3  -  3640  c4  +  9240  c6)) 

Wl,9 

362208  +  235200  c3  +  91  a  (448  +  352  c2  -  1125  c4) 

-  21021  c4  +  141414  c3  c4  -  9152  c5 

-  286  c2  (-555  +  413  c5)  -  462  (594  +  603  c3  +  325  c5)  c6 

Wl,10 

-143  ci  (-899  +  784  c2  +  2205  c5) 

+  49  (2574  c32  -  52  c3  (-16  +  44  c2  -  60  c4  +  33  c5) 

+  3  (2541  +  1403  c5  +  1040  c4  c5  -  176  (14  +  15  c5)  c6)) 

w  1,11 

-16  (-35362  +  4004  c2  -  10920  c4  +  43197  c6) 

tUl,12 

-143  ci  (451  +  784  c2  -  2205  c5) 

-  7  (18018  c32  +  52  c3  (416  +  308  c2  -  420  c4  -  231  c5) 

-  3  (16357  +  (13539  +  7280  c4)  c5)  +  3696  (14  +  15  c5)  c6) 

Wl,13 

362208  +  235200  c3  +  91  ci  (448  +  352  c2  -  795  c4) 

+  21021  c4  +  33306  c3  c4  -  9152  c5 

+  286  c2  (-555  +  637  c5)  -  462  (958  +  837  c3  -  325  c5)  c6 

Wl.14 

132  (-97+  98c6) 

d2 

1 

10090080 

W2,0 

-12936  (-l  +  c5) 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  j  ^  'jk 


Expression 


w2, i  -26  ci  (-3608  +  4851  c2  -  1568  c3  -  4851  c4  +  5880  c5) 

+  49  (429  c2  (— 1  +  5  C5)  +  2  (3696  -  858  c4  + 24  c5  (-254+  165  c5) 

+  13  c3  (-32  +  88  c3  +  165  c4  -  165  c6)  +  2145  c6)) 

w2,2  7  (53361  +  4758  a2  +  a  (29463  -  50133  c5) 

-  54895  c5  +  286  c3  (-91  +  59  c3  +  59  c5)) 

w2,3  -152880  ci2  +  42042  c2  (-2  +  5  c3) 

+  176  (2058  +  13  c3  (-41  +  49  c3)) 

+  210210  (-1  +  c3)  c4  -  784  (410  +  143  c3)  c5 
+  294  ci  (429  c2  +  800  (-1  +  c5)  -  429  c6)  +  21021  (-1  +  5  c5)  c6 

w2, 4  -7  (-49071  +  40617  c3  +  26  ci  (-832  +  777  ci  +  1778  c3) 

+  70235  c5  -  75691  c3c5) 

w2, 5  26  ci  (3608  +  4851  c2  +  1568  c3  -  4851  c4  -  5880  c5) 

+  49  (-429  c2  (— 1  +  5  c5) 

+  2  (3  (1232  +  286  c4  +  8  c5  (-254  +  165  c5)  -  715  c6) 

+  13  c3  (-32  +  88  c3  -  165  c4  +  165  c6))) 

w2,6  -7  (—53361  +  26 ci  (224+183ci-466c3)  +  29463c3+23045c5-28501c3c5) 

w2,7  -152880  ci2  -  93808  c3  -  294  ci  (429  c2  -  800  (-1  +  c5)  -  429  c6) 

+  49  (7392  +  4290  c4  -  6560  c5  +  429  c6) 

-  7007  (—16  c32  +  6  c2  (—2  +  5  c3)  +  30  c3  c4  +  16  c3  c5  +  15  c5  c6) 

u>2,8  7  (49071  +  20202  c42  +  ci  (40617  -  69867  c5) 

-  31729  c5  -  286  c3  (-59  +  91  c3  +  91  c5)) 

( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  j  ^  'jk 


Expression 


w2, 9  -152880  ci2  +  235200  c3  +  1274  a  (32  +  32  c3  -  99  c4  -  99  c6) 

—  539  (390  C2  (— 1  +  c3)  +  928  c3  C5  —  195  c4  C5  +  390  c3  eg) 
-  11  (1911  c4  +  4  (6100  c5  -  147  (56  +  13  c6))) 


tw2,io  -7  (26  c3  (-224  +  649  c3)  +  26  ci  (-1001  +  466  c3  -  183  c5) 
+  3  (-17787  +  c5  (6536  +  15125  c5))) 


W2,ll 


16  (28927  +  19110  a  +  14014  c3  -  46893  c5) 


w2, 12  7  (338  c3  (-64  +  77  c3)  +  26  ci  (-649  +  1778  c3  +  777  c5) 

-  3  (-16357 +  c5  (4248+  16555  c5))) 


w2,i3  -152880  ci2 +  235200  c3+ 11  (32928  +  1911  c4- 24400  c5- 7644  c6) 

+  1274  Ci  (32  +  32  c3  +  99  c4  +  99  eg) 

+  539  (390  C2  (— 1  +  c3)  —  928  c3  C5  —  195  c4  C5  +  390  c3  eg) 


w2,i4  -12936  (—1  +  c5) 

d3  1 

10090080 

xc3i 0  132  (293  +  98  c4) 


w3ii  —273  C2  (77  +  265  c3  —  122  C5) 

-  14  (-25872  +  2912  c3  +  31614  c4  +  16800  c5  -  27621  c4  c5) 

+  286  ci  (-32  +  525  c4  -  637  c6)  +  286  (555  +  112  c3)  c6 

w3,2  -128557  c3  - 147  ci  (-1403  + 1040  c2  -  2145  c3  +  2640  c4  -  572  c5) 

+  49  (7623  -  7392  c4  +  26  c5  (-32  +  120  c2  +  99  c5)) 

-  112112  (c3  +  c5)  c6 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  j  ^  'jk 


Expression 


w3, 3  22  (16464  -  3822  c2  +  416  c3  -  23511  c4) 

+  210  ci  (-1120  +  1131  c2  +  2299  c4) 

+  1274  (32  +  111  c2)  c5  +  1001  (-21  +  47  c3  -  86  c5)  c6 

w3A  -21  (-16357+  18544  c3+  17248  c4)  -  169598  c5 

+  7  (-30030  ci2  +  52  Cl  (416  +  420  c2  +  231  c5  -  308  c6) 

+  7  (3120  c2  c3  +  33  c3  (65  c3  +  240  c4  —  78  C5)  +  2288  C5  c3)) 

w3,5  -273  c2  (-77  +  375  c3  -  518  c5) 

-  14  (2912  c3  +  297  c4  (66  -  67  c5)  +  336  (-77  +  50  c5)) 

-  286  ci  (32  +  525  c4  -  413  c6)  +  286  (-555  +  112  c3)  c6 

w3, 6  210210  ci2  -  11319  (-33  +  32  c4)  +  233662  c5 

+  2548  ci  (-16  +  60  c2  -  33  c5  -  44  c6)  +  49  (-2145  c32 

+  6  c3  ( — 344  +  520  c2  +  1320  c4  +  429  C5)  +  2288  C5  c3) 

w3J  22  (16464  +  3822  c2  +  416  c3  -  9081  c4) 

-  210  ci  (1120  +  299  c2  -  869  c4) 

+  182  (224  +  183  c2)  c5  +  1001  (21  +  17  c3  +  22  c5)  c6 


w3, 8  -21  ci  (-13539  +  7280  c2  +  15015  c3  +  18480  c4  +  4004  c5) 

+  7  (49071  -  51744  c4  +  26  (832  +  840  c2  -  693  c5)  c5) 

+  143  (451  c3  -  784  (c3  +  c5)  c6) 

w3,9  158730  c2  +  235200  c3  -  7  (12480  c2  c3  +  33  c4  (1375  c3  +  234  c5) 

+  12298  c5  c6  +  26  ci  (-224  +  345  c2  +  1001  c6)) 

+  11  (-34503  c4  +  4  (-208  c5  +  147  (56  +  13  c6))) 

tc3ji0  -210210  ci2  -  49  (3  (-2541  +  176  c4  (14  +  15  c5) 

+  c5  (-1403  +  1040  c2  +  858  c5)) 

+  13  c3  (-229  +  240  c2  +  33  c5  -  176  c6)) 

-  286  ci  (-817  +  735  c3  -  392  c6) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj ;  Wjk 


Expression 


103.11  —16  (-35362+  10920  c2  + 43197  c4- 4004  c6) 

103.12  210210  ci2  -  7  (3  (-16357+  (-13539  +  7280  c2  -  6006  c5)  c5 

+ 1232  c4  (14  +  15  c5))  +  13  c3  (2819  +  1680  c2  -  231  c5  -  1232  c6)) 
+  286  ci  (-593  +  735  c3  +  392  c6) 


103,13  362208  +  235200  c3  -  390  c2  (407  +  224  c3) 

-  337491  c4  -  347655  c3  c4  -  9152  c5  +  54054  c4  c5 

+  2002  (-42  +  11  c5)  c6  +  182  Ci  (224  +  1305  c2  +  649  c6) 


103,14  132  ( — 97  +  98  C4) 

di 

1441440 

104,0  -1848  (— I  +  C3) 

104,1  —7  (2288  ci2  +  429  c2  (I  +  5C3  +  6C5) 

-  286  ci  (-8  +  8  c3  -  15  c4  +  15  c6)  -  2  (16  c3  (-257  +  150  c5) 

+  3  (1232  +  143  c4  (-2  +  3  c5)  +  40  c5  (-20  +  13  c5)  +  715  c6))) 


104,2  -7  (-7623  +  11341  c3+26  (32-lllc5)  c5  +  ci  (-4209+10813c3+6604c5)) 


104,3  14  (3696  -  2400  d  -  858  c2  -  2145  d  c2  -  2552  c3  +  5104  d  c3 

-  2145  (1  +  ci)  c4  +  13  (32  +  32  ci  +  99  c2)  c5  +  1560  c52) 
—  3003  (1  +  5  C3  +  6  C5)  C6 


104,4  49071  +  16874  ci2  -  16874  c5  -  52  d  (-416  +  233  c5) 

+  3  c3  (-29896  +  15125  c3  +  1586  c5) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  j  ^  'jk 


Expression 


W4,5  —7  (2288  ci2  —  429  C2  (1  4- 5  c3  4- 6  C5) 

-  286  ci  (-8  +  8  c3  +  15  c4  -  15  c6)  +  2  (-16  c3  (-257  +  150  c5) 

+  3  (-1232  +  40  (20  -  13  c5)  c5  +  143  c4  (-2  +  3  c5)  +  715  c6))) 


w4,6  7  (7623  -  3718  ci2  +  3718  c5  + 52  ci  (-16  4-  127  c5) 

+  3  c3  (-3944  +  2365  c3  +  962  c5)) 


w4,7  14  (3696  —  2552 c3  +  2145 c4  +  416 c5  + 1560 c52  —  429 C2  (-2  +  3c5) 

+  ci  (-2400  +  2145  c2  +  5104  c3  +  2145  c4  +  416  c5)) 

+  3003  (1  4-  5  c3  4-  6  C5)  eg 


w4,8  49071  -  32197  c3  +  26  c5  (832  +  183  c5)  +  ci  (40617  -  28501  c3  +  12116  c5) 

wA, 9  -7  (-4290  c2  T  3  c3  (864  +  2640  c3  +  715  c4) 

+  11  (39  c4  +  4  (-168  +  52  c5  -  39  c6))  +  26  (88  ci2 

Ci  (32  +  165  c2  T  32  C5  4- 165  eg)  4-  3  C5  (40  c3  4-  33  (C4  4-  eg)))) 

^4,10  7  (7623  —  6791  c3  4-  3718  ci  (1  4-  ci  4-  c3)  4-  4209  C5  —  9981  c3  C5  —  2886  C52) 


to4,ii  112  (853  4-  286  ci -  957  c3  -  390  c5) 

tw4,i2  49071  -  70703  c3  -  16874  Ci  (1  +  Cl  +  c3)  4-  40617  c5  -  50133  c3  c5  -  4758  c52 

tu4,i3  -7  (4290  c2  +  3  c3  (864  +  2640  c3  -  715  c4) 

4- 11  (-39  c4  +  4  (-168  +  52  c5  +  39  c6))  +  26  (88  ci2 
4-  ci  (165  c2  —  32  (1  4-  c5)  4- 165  eg)  4-  3  c5  (40  c3  —  33  (C4  4-  eg)))) 

104,14  -1848  (—1  4- c3) 

( continues ) 
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Table  B.7:  Integral  approximation  IJ}  n  =  14.  ( continued ) 


dj  ■  Wjk 


Expression 


G?5 


1 

10090080 


^5,0 


132  (293  +  98  c2) 


w5, i  -286  ci  (32  +  189  c2  -  301  c4)  +  231  c2  (-1643  +  1375  c5) 

-  98  (-3696  +  416  c3  +  858  c4  +  1859  c3  c4  +  2400  c5) 

+  390  (407  +  161  c3  +  224  c5)  c6 

w5,2  -362208  c2  -  286  c3  (817  +  735  c3  -  392  c4)  +  49  (7623  -  2977  c5) 

-  49  (2574  ci2  +  26  c5  (165  c3  -  88  c4  -  120  c6) 

+  3  ci  (-1403  +  2640  c2  -  143  c5  +  1040  c6)) 

w5,3  352  (1029  +  26  c3)  -  462  c2  (958  +  325  c3) 

-  286  (555  +  637  c3)  c4  +  2912  (14  +  11  c4)  c5 

+  273  (-77  +  265  c5)  c6  +  42  ci  (-5600  +  9207  c2  +  793  c6) 

w5A  343497  -  126126  ci2  -  284319  c3  -  64493  c5 
+  364  ci  (416  +  231  c3  +  308  c4  +  420  c6) 

+  49  (528  c2  (-14  +  15  c3)  -  143  (45  c3  +  16  c4)  c5  +  3120  c3  c6) 


286  ci  (—32  +  189  c2  —  77  c4) 

+  588  (616  +  143  c4  -  400  c5)  +  231  c2  (-1461  +  1505  c5) 

+  182  c3  (-224  +  649  c4  -  1305  c6)  +  390  (-407  +  224  c5)  c6 

w5,6  -147  (-2541  +  2464  c2  +  1403  c3)  +  128557  c5 

+  49  (2574  ci2  +  7920  c2  c3  -  52  ci  (16  +  33  c3  -  44  c4  -  60  c6) 

+  13  (495  c3 C5  —  176  c4 C5  +  240  c3 c3)) 


w5,r  22  (16464  +  21  c2  (-594  +  325  c3)  +  7215  c4  +  13  c3  (32  +  413  c4)) 

+  2912  (14  +  11  c4)  c5  +  273  (77  +  375  c5)  c6 
+  42  ci  (-5600  +  6633  c2  +  3367  c6) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  5  Wj  k 

Expression 

W5,8 

343497  -  362208  c2  +  286  c3  (593  +  735  c3  +  392  c4) 

+  256529  c5  +  7  (18018  ci2  +  182  c5  (165  c3  +  88  c4  +  120  c6) 
-  3  ci  (-13539  +  18480  c2  +  1001  c5  +  7280  c6)) 

W  5,9 

-66  c2  (3027  +  2765  c3)  -  182  d  (-224  +  121  c4  -  183  c6) 

+  210  c3  (1120  + 299  c6) 

+  11  (91  c4  (-21  +  17  c5)  +  4  (8232  -  208  c5  +  1911  c6)) 

■^5,10 

286  ci  (817  +  294  c3  -  392  c4  -  441  c5) 

+  49  (7623  +  26  c3  (32  +  165  c3  -  88  c4)  +  2064  c5 

-  2145  c52  -  528  c2  (14  +  15  c5)  -  3120  (c3  +  c5) 

ce) 

■^5,11 

-16  (-35362  +  43197  c2  +  4004  c4  +  10920  c6) 

U!5,12 

-286  ci  (593  +  294  c3  +  392  c4  -  441  c5) 

-  7  (26  c3  (832  +  1155  c3  +  616  c4)  +  3696  c2  (14  +  15  c5) 

-  3  (16357  +  c5  (18544  +  5005  c5))  +  21840  (c3  +  c5) 

ce) 

f+5,13 

-66  c2  (7837  +  7315  c3)  +  210  c3  (1120  -  1131  c6) 

+  182  ci  (224  +  473  c4  +  777  c6) 

+  11  (91  c4  (21  +  47  c5)  -  4  (-8232  +  208  c5  +  1911  c6)) 

W5,14 

132  (—97  +  98  c2) 

de 

1 

10090080 

W  6,0 

-12936  (-1  +  ci) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj ;  Wjk 


Expression 


w6, i  11  ci  (-24400  +  9555  c2  +  45472  c5) 

+  49  (429  c2  (-1  +  6  c3)  -  2  (1560  c32  +  13  c3  (32  +  99  c4  -  32  c5) 
+  429  c4  (2  +  5  c5)  +  48  (-77  +  50  c5))  +  4290  (1  +  c5)  c6) 


u>6,2  -7  (-53361  +  45375  ci2  +  6  a  (3268  +  793  c3) 

+  26  c3  (1001  +  466  c5)  +  26  c5  (224  +  649  c5)) 


w6, 3  388080  ci2  -  93808  c3  -  98  (-3696  +  2145  c4  -  416  c5) 

—  1274  ((—32  c3  +  165  c4  —  88  C5)  C5  +  33  c2  (2  +  3  c3  +  5  C5)) 

+  21021  (-1  +  6  c3)  c6  +  147  ci  (-4064  +  1040  c3  +  715  c6) 


WQA 


W6,5 


7  (3  c3  (-13539  +  6734  c3)  +  ci  (-31729  +  69867  c3  +  26026  c5) 

-  11  (-4461  +  26  c5  (59  +  91  c5))) 

-11  ci  (24400  +  9555  c2  -  45472  c5)  +  49  (-429  c2  (-1  +  6  c3) 

+  2  (-1560  c32  +  13  c3  (99  c4  +  32  (-1  +  c5)) 

+  3  (1232-  800  c5  + 143  c4  (2  +  5c5)-715  (1  +  c5)  c6))) 


w6,6  7  (183  c3  (-161  +  26  c3)  +  ci  (-54895  +  50133  c3  -  16874  c5) 

+  11  (4851  +  26  c5  (91  +  59  c5))) 


w6, 7  388080  ci2  -  93808  c3  +  98  (3696  +  2145  c4  +  416  c5) 

+  1274  (33  c2  (2  +  3  c3  +  5  C5)  +  C5  (32  c3  +  165  c4  +  88  C5)) 

+  147 ci  (-4064  +  1040  c3  -  715  c6)  -21021  (-l  +  6c3)  c6 


w6,8  -7  (-49071  +  49665  ci2  +  6  ci  (2124  +  3367  c3) 

-  338  c5  (64  +  77  c5)  -  26  c3  (649  +  1778  c5)) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj ;  Wjk 


Expression 


w6, 9  -49  ci  (6560  +  4800  c3  -  2145  c4  -  2288  c5) 

+  294  c3  (800  -  520  c3  +  429  c4  +  429  c6) 

+  14014  (15  c2  (1  +  c5)  +  c5  (8  c5  +  15  c6)) 

+  11  (-1911  c4  +  4  (8232  +  2132  c5  +  1911  c6)) 


We, io  —7  (26  c3  (— 224  +  183  c3  —  466  C5) 

-  21  (2541  +  1403  c5)  +  11  c4  (2095  +  2591  c5)) 


w6, 11  -16  (-28927  +  46893  Cl  +  19110  c3  +  14014  c5) 

we, 12  —7  (26  c3  (832  +  777  c3  +  1778  C5) 

+  11  ci  (6385  +  6881  c5)  -  3  (16357  +  13539  c5)) 


tw6,i3  -49  ci  (6560  +  4800  c3  +  2145  c4  -  2288  c5)  -  210210  c2  (1  +  c5) 
+  11  (1911  c4  +  4  (52  c5  (41  +  49  c5)  +  147  (56  -  13  c6))) 

-  294  (c3  (-800  +  520  c3  +  429  c4)  +  143  (3  c3  +  5  c5)  c6) 


^6,14  — 12936  (—1  +  ci) 

1 

2522520 

9669 

w7,i  -4  (572  ci  -  3003  c2  +  2548  c3  +  42  (-539  +  429  c4  +  350  c5)  -  19305  c6) 

w7,2  109368  ci  -  110968  c3  -  3626  (-33  +  26  c5) 

w7,3  -4  (14700  ci  +  18018  c2  -  572  c3  +  19305  c4  -  7  (3234  +  364  c5  +  429  c6)) 

( continues ) 


d7 

w7, 0 
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Table  B.7:  Integral  approximation  Ij ,  n  =  14.  ( continued ) 
dj ,  Wjk  Expression 

w7> 4  59598  +  121940  a  -  13272  c3  -  94952  c5 

w7,5  -4  (572  ci  +  7  (-3234  +  429  c2  +  364  c3  -  2574  c4  +  2100  c5)  +  19305  c6) 

w7,6  -98  (-1221  +  962  Cl  +  1116  c3)  +  110968  c5 

w7,r  4  (22638  -  14700  a  +  18018  c2  +  572  c3  +  19305  c4  +  2548  c5  -  3003  c6) 

w7,8  59598  +  13272  Cl  +  94952  c3  +  121940  c5 

w7,9  4  (2548  ci  +  19305  c2  +  14700  c3  +  11  (2058  +  273  c4  -  52  c5  +  1638  c6)) 

w7,io  110968  ci  +  98  (1221  +  962  c3  +  1116  c5) 

iv7jn  141448 

w7,12  -94952  ci  -  121940  c3  +  42  (1419  +  316  c5) 

u>7,i3  4  (2548  ci  -  19305  c2  +  14700  c3  -  11  (-2058  +  273  c4  +  52  c5  +  1638  c6)) 

u>7ji4  — 3201 

,  1 

«8  - 

1441440 

w 8,o  1848  (1  +  ci) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  j  ^  'jk 


Expression 


w8, i  7  (429  c2  (-1  +  6  c3)  +  11  a  (195  c2  +  464  (1  -  2  c5)) 

+  2  (3696  +  1560  c32  -  2400  c5  -  429  c4  (2  +  5  c5) 

-  13 c3  (99 c4  +  32  (1  +  c5))  +  2145  (1  +  c5)  c6)) 


Ws, 2  7  (7623  +  7095  d2  +  6  a  (1972  +  481  c3) 

-  26  c5  (32  +  143  c5)  -  26  c3  (143  +  254  c5)) 


w8, 3  -14  (3960  ci2  +  24  Cl  (-54  +  65  c3)  -  11  (336  +  104  c3  -  195  c4) 

4“  13  ( — 32  +  32  c3  4-  165  c4)  C5  1144  C52  +  429  c2  (2  +  3  c3  +  5  C5)) 
4-  3003  (—1  4-  5  ci  4-  6  c3)  C6 


w8A  -3  c3  (13539  +  1586  c3)  +  a  (70703  -  50133  c3  +  16874  c5) 
-  11  (-4461  +  1534  c5  (1  4-  c5)) 


u>8,5  -7  (429  C2  (-1  4-  6  c3)  +  11  a  (195  c2  +  464  (-1  +  2  c5)) 

+  2  (—1560  c32  4-  c3  (—1287  c4  4-  416  (1  +  c5)) 

+  3  (-1232  +  800  c5  -  143  c4  (2  +  5  c5)  4-  715  (1  +  c5)  c6))) 


w8, 6  -7  (3  c3  (1403  +  962  c3)  +  d  (-6791  +  9981  c3  +  3718  c5) 

-  11  (693  + 338  c5  (l  +  c5))) 


w8,7  -7  (7920  ci2  -  22  (336  +  104  c3  +  39  c2  (2  +  3  c3)  +  195  c4) 

—  26  (32  +  165  c2  —  32  c3  +  165  c4)  C5  +  2288  C52 

+  429  (-1  +  6  c3)  c6  +  ci  (-2592  +  3120  c3  +  2145  c6)) 


w8, s  49071  +  16874  c3  +  3  a  (29896  +  15125  a  +  1586  c3) 

+  21632  C5  +  12116  c3  C5  +  16874  C52 

( continues ) 
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Table  B.7:  Integral  approximation  Ij ,  n  =  14.  ( continued ) 

dj ,  Wjk  Expression 

io8,9  7  (6  c3  (800  +  520  c3  +  429  c4) 

+  ci  (8224  +  4800  c3  +  2145  c4  -  2288  c5) 

+  4290  c2  (1  +  c5)  +  858  (3  c3  +  5  c5)  cq 

-  11  (39  c4  +  4  (52  c5  (1  +  c5)  -  3  (56  +  13  c6)))) 

u>8,io  7  (26  c3  (32  +  111  c3  +  254  c5)  +  11  c4  (1031  +  983  c5)  +  3  (2541  +  1403  c5)) 

ws,u  112  (853 +  957  ci +  390  c3  +  286  c5) 

to8,i2  26  c3  (-832  +  183c3-466c5)  +  llci  (2927  +  2591c5)  +  3  (16357+ 13539  c5) 


ws,i3  7  (6  c3  (800  +  520  c3  -  429  c4) 

+  ci  (8224  +  4800  c3  -  2145  c4  -  2288  c5)  -  4290  c2  (1  +  c5) 

—  858  (3c3  +  5c5)  c6  +  ll  (39 c4  — 4  (-168  +  52c5  (l  +  c5)  +  39 c6))) 


WS,14 


1848  (1  +  ci) 


dg 


1 

10090080 


io9,o 


132  (293  —  98  c2) 


w9,i  -286  ci  (32  +  189  c2  -  77  c4)  -  231  c2  (-1461  +  1505  c5) 

-  14  (13  c3  (224  +  649  c4)  +  42  (-616  +  143  c4  +  400  c5)) 
+  390  (407  +  609  c3  -  224  c5)  c6 


io9,2  362208  c2  -  286  c3  (817  +  735  c3  +  392  c4)  +  49  (7623  -  2977  c5) 

-  49  (2574  ci2  +  26  c5  (165  c3  +  88  c4  +  120  c6) 

-  3  ci  (1403  +  2640  c2  +  143  c5  +  1040  c6)) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  j  ^  'jk 


Expression 


w9, 3  352  (1029  +  26  c3)  -  462  c2  (-594  +  325  c3) 

-  286  (555  +  413  c3)  c4  -  2912  (-14  +  11  c4)  c5 

-  273  (77  +  375  c5)  c6  -  42  Cl  (5600  +  6633  c2  +  3367  c6) 

w9A  343497  -  126126  ci2  -  25872  c2  (-14  +  15  c3) 

-  64493  c5  +  364  a  (416  +  231  c3  -  308  c4  -  420  c6) 

-7  (-16016c4c5  +  3c3  (13539  +  15015  c5  +  7280  c6)) 


wg,5  286  ci  (—32  +  189  c2  —  301  c4) 

+  98  (3696  -  416  c3  +  858  c4  +  1859  c3  c4  -  2400  c5) 

—  231  c2  (-1643+  1375  c5) -  390  (407+  161  c3  +  224  c5)  c6 

u>9,6  147  (2541  +  2464  c2  -  1403  c3)  +  128557  c5 

+  49  (2574  ci2  -  7920  c2  c3  -  52  Cl  (16  +  33  c3  +  44  c4  +  60  c6) 

+  13  (495  c3 C5  +  176  c4 C5  —  240  c3  cq)) 


w9,r  22  (16464  +  416  c3  +  21  c2  (958  +  325  c3)  +  7215  c4  +  8281  c3  c4) 

-  2912  (-14  +  11  c4)  c5  -  273  (-77  +  265  c5)  c6 
-  42  ci  (5600  +  9207  c2  +  793  c6) 

wg,8  343497  +  362208  c2  +  286  c3  (593  +  735  c3  -  392  c4) 

+  256529  c5  +  7  (18018  ci2  +  182  c5  (165  c3  -  88  c4  -  120  c6) 

+  3  ci  (13539  +  18480  c2  -  1001  c5  +  7280  c6)) 

w9,g  66  c2  (7837  +  7315  c3)  -  182  ci  (-224  +  473  c4  +  777  c6) 

+  210  c3  (1120+  1131  c6) 

-  11  (91  c4  (21  +  47  c5)  +  4  (208  c5  -  147  (56  +  13  c6))) 


wgAo  286  ci  (817  +  294  c3  +  392  c4  —  441 C5) 

+  49  (7623  +  26  c3  (32  +  165  c3  +  88  c4)  +  2064  c5 

-  2145  c52  +  528  c2  (14  +  15  c5)  +  3120  (c3  +  c5)  c6) 

( continues ) 
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Table  B.7:  Integral  approximation  IJ}  n  =  14.  ( continued ) 


dj  j  ^  'jk 


Expression 


«>9,11 


16  (35362  +  43197  c2  +  4004  c4  +  10920  c6) 


■^9,12  —286  ci  (593  +  294  C3  —  392  c4  —  441 C5) 

+  7  (-26  c3  (832  +  1155  c3  -  616  c4)  +  3696  c2  (14  +  15  c5) 

+  3  (16357  +  c5  (18544  +  5005  c5))  +  21840  (c3  +  c5)  c6) 


w9,i3  66  c2  (3027  +  2765  c3)  +  210  c3  (1120  -  299  c6) 

+  182  ci  (224  +  121  c4  -  183  c6) 

-  11  (91  c4  (-21  +  17  c5)  +  4  (-8232  +  208  c5  +  1911  c6)) 


w9  i4 


-132  (97  +  98  c2) 


ilO 


10090080 


^10,0 


12936  (1  +  c3) 


toio.i  112112  ci2  -  286  ci  (-328  +  392  c3  +  735  c4  -  735  c6) 

-  49  (429  c2  (1  +  5  c3  +  6  c5)  +  2  (-429  c4  (-2  +  3  c5) 

+  120  c5  (20  +  13  c5)  +  80  c3  (-41  +  30  c5)  -  33  (112  +  65  c6))) 


wio,2  7  (53361 +  23045 c3  + ci  (29463  +  28501  c3- 12116 c5)  - 26 c5  (224+ 183 c5)) 

tui0>3  -98  ci  (2400  +  2145  c2  +  5104  c3  +  2145  c4  +  416  c5)  +  2  (134200  c3 
+  21021  c2  (-2  +  3  c5)  -  49  (-3696  +  2145  c4  -  416  c5  + 1560  c52)) 

—  21021  (1  +  5  c3  +  6  C5)  eg 


twi0)4  7  (49071  +  21632  Cl  +  26026  ci2  +  12744  c3 

-  49665  c32  -  26  (649  +  1778  ci  +  777  c3)  c5) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj ;  Wjk 


Expression 


1010,5  112112  ci2  —  286  Ci  (—328  +  392  C3  —  735  C4  +  735  cq ) 

+  49  (429  c2  (1  +  5  c3  +  6  c5)  -  2  (80  c3  (-41  +  30  c5) 

+  3  (-1232  +  143  c4  (-2  +  3  c5)  +  40  c5  (20  +  13  c5)  +  715  c6))) 


wio,6  7  (-16874  ci2  +  52  d  (-112  +  233  c5) 

+  77  (693  +  338  c5)  -  3  c3  (-6536  +  15125  c3  +  1586  c5)) 


twi0>7  98  ci  (-2400  +  2145  c2  -  5104  c3  +  2145  c4  -  416  c5)  +  2  (134200  c3 
-  21021  c2  (-2  +  3  c5)  +  49  (3696  +  2145  c4  +  104  (4  -  15  c5)  c5)) 
+  21021  (1  +  5  c3  +  6  C5)  C6 


wio,8  7  (49071  + 70235 c3  + 26  (832-777 c5)  c5  +  ci  (40617  +  75691  c3+46228 c5)) 

wio,9  210210  c2  +  147  c3  (4064  +  2640  c3  -  715  c4)  +  1274  (88  ci2 

+  Ci  (32  +  165  c2  —  32  C5  +  165  eg)  +  3  C5  (40  c3  —  33  (C4  +  c3))) 

+  11  (-1911  c4  +  4  (2132  c5  +  147  (56  +  13  c6))) 

1010.10  7  (53361  +  54895  c3  +  286  ci  (91  +  59  ci  +  59  c3) 

+  29463  c5  +  50133  c3  c5  +  4758  c52) 

1010.11  16  (28927  -  14014  ci  +  46893  c3  +  19110  c5) 

10 10.12  —7  (—31729  c3  +  286  ci  (59  +  91  ci  +  91  c3) 

-  69867  c3  c5  -  20202  c52  -  3  (16357  +  13539  c5)) 

1010. 13  -210210  c2  +  147  c3  (4064  +  2640  c3  +  715  c4) 

+  11  (1911  c4  +  4  (2132  c5  +  147  (56  -  13  c6)))  +  1274  (88  ci2 
—  Ci  ( — 32  +  165  c2  +  32  C5  +  165  eg)  +  3  C5  (40  c3  +  33  (c4  +  eg))) 


W  10,14 


12936  (1  +  c3) 


( continues ) 
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APPENDIX  B.  COEFFICIENTS  FOR  FIRST-ORDER  METHODS 


Table  B.7:  Integral  approximation  IJ}  n  =  14.  ( continued ) 


dj  j  ^  'jk 


Expression 


d\\ 


1 

10090080 


Wll,0 


132  (293-  98  c4) 


twn,i  273  c2  (-77  +  375  c3  -  518  c5) 

+  286  ci  (-32  +  525  c4  -  413  c6)  -  2912  c3  (14  +  11  c6) 

+  6  (60368  +  693  c4  (66  -  67  c5)  -  39200  c5  +  26455  c6) 


wn,2  -128557  c3  +  147  a  (1403  +  1040  c2  +  2145  c3  +  2640  c4  +  572  c5) 
+  49  (7623  +  7392  c4  +  26  c5  (-32  -  120  c2  +  99  c5)) 

+  112112  (c3  T  C5)  C6 


u>n,3  210  ci  (-1120  +  299  c2  -  869  c4)  +  22  (16464  +  416  c3  +  9081  c4) 

+  40768  c5  -  546  c2  (154  +  61  c5)  -  1001  (21  +  17  c3  +  22  c5)  c6 


ton>4  -210210  ci2  +  105105  c32 

-  42  c3  (9272  +  3640  c2  +  9240  c4  +  3003  c5) 

-  364  ci  (-416  +  420  c2  -  231  c5  -  308  c6) 

+  11  (31227  +  32928  c4  -  26  c5  (593  +  392  c6)) 


rcn,5  273  c2  (77  +  265  c3  —  122  C5) 

-  286  ci  (32  +  525  c4  -  637  c6)  -  2912  c3  (14  +  11  c6) 

-  6  (-154  (392  +  479  c4)  +  7  (5600  +  9207  c4)  c5  +  26455  c6) 


wllfi  210210  ci2  +  11319  (33  +  32  c4)  +  233662  c5 
—  2548  ci  (16  +  60  c2  +  33  C5  —  44  cq) 

+  49  (—3  c3  (688  + 1040  c2  +  715  c3  + 2640  c4- 858  c5)- 2288  c5c6) 


wn,7  -210  ci  (1120  +  1131  c2  +  2299  c4)  +  22  (16464  +  416  c3  +  23511  c4) 

+  40768  c5  -  3822  c2  (-22  +  37  c5)  -  1001  (-21  +  47  c3  -  86  c5)  c6 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj ;  Wjk 


Expression 


u;ii,8  21  ci  (13539  +  7280  c2  -  15015  c3  +  18480  c4  -  4004  c5) 

+  7  (49071  +  51744  c4  -  26  c5  (-832  +  840  c2  +  693  c5)) 
+  143  (451  c3  +  784  (c3  +  c5)  c6) 


u>n,9  235200  c3  + 390  c2  (407  +  224c3)-182ci  (-224+ 1305  c2  + 649  c6) 

+  77  (4515  c3  c4  -  26  c5  (27  c4  +  11  c6)) 

+  11  (30681  c4  +  4  (8232  -  208  c5  +  1911  c6)) 


11)11,10  — 210210  ci“ 

+  49  (3  (2541  +  (1403  +  1040  c2  -  858  c5)  c5  +  176  c4  (14  +  15  c5)) 
+  13  c3  (229  +  240  c2  -  33  c5  -  176  c6)) 

-  286  ci  (-817  +  735  c3  +  392  c6) 


ton, n 


16  (35362  +  10920  c2  +  43197  c4  -  4004  c6) 


w±i,i2  210210  ci2 

+  7  (3  (16357+1232 c4  (14+15c5)  +  c5  (13539+7280 c2+6006 c5)) 
+  13  c3  (-2819  +  1680  c2  +  231  c5  -  1232  c6)) 

+  286  ci  (-593  +  735  c3  -  392  c6) 


tcn,i3  362208  +  235200  c3  +  390  c2  (-407  +  224  c3) 

+  379533  c4  +  317625  c3  c4  -  9152  c5  +  54054  c4  c5 

+  2002  (-42  +  43  c5)  c6  +  182  Ci  (224  +  345  c2  +  1001  c6) 


Wll,14 


-132  (97  +  98  c4) 


di2 


1 

1441440 


w  i2,o 


1848  (1  +  c5) 


( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj ;  Wjk 


Expression 


1012,1  —7  (26  ci  (88  +  99  C2  +  32  C3  —  99  C4  —  120  C5) 

-  429  c2  (-1  +  5  c5)  +  2  (13  c3  (32  +  88  c3  -  165  c4  +  165  c6) 
+  3  (286  c4  +  24  c5  (-18  +  55  c5)  -  11  (112  +  65  c6)))) 


w12,2  7  (7623 -2886  Cl2  +  6791  c5  + 3718  c3  (-1  +  c3  +  c5)  +  3ci  (1403  + 3327  c5)) 


w12,3  14  (3696  +  1560  ci2  +  429  c2  (-2  +  5  c3)  -  2145  c4  +  4112  c5 

+  143  c3  (8  —  8  c3  +  15  c4  +  8  C5)  +  3  ci  (429  C2  —  800  (1  +  C5))) 
—  3003  (1  +  6  ci  —  5  C5)  cq 


w12A  49071  +  26  ci  (832  +  183  ci  -  466  c3)  -  40617  c3  +  32197  c5  -  28501  c3  c5 


10  12,5  7  (— 429  C2  (— 1  +  5  C5)  +  26  ci  (— 88  + 99  C2  —  32  c3  —  99  c4+ 120  C5) 

+  2  (3  (1232  +  286  c4  +  24  (18  -  55  c5)  c5  -  715  c6) 

-  13  c3  (32  +  88  c3  +  165  c4  -  165  c6))) 


10  12,6  7  (7623  -  4209  c3  +  26  ci  (-32  +  111  ci  +  254  c3)  +  11341  c5  -  10813  c3  c5) 


1012,7  14  (3696  +  1560  ci2  -  429  c2  (-2  +  5  c3)  +  2145  c4  +  4112  c5 

+  143  c3  (8  -  8  c3  -  15  c4  +  8  c5)  -  3  ci  (429  c2  +  800  (1  +  c5))) 
+  3003  (1  +  6  ci  —  5  C5)  cq 


tci2,8  49071 -4758  ci2  +  70703  c5- 16874 c3  (-l  +  c3  +  c5)  +  3  ci  (13539+16711  c5) 


1012,9  7  (7392  +  3120  ci2  -  4290  c2  (-1  +  c3)  +  4800  c3 

-  429  c4  +  5104  c5  +  10208  c3  c5  +  2145  c4  c5 

—  858  ( — 2  +  5  c3)  Cg  —  26  ci  ( — 32  +  32  c3  +  99  c4  +  99  c3)^ 


1012,10  -7  (26  c3  (—32  +  143 c3)  +  26  ci  (-143  +  254 c3  +  111  c5) 

-  3  (2541  +  c5  (3944  +  2365  c5))) 

( continues ) 
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Table  B.7:  Integral  approximation  IJ}  n  =  14.  ( continued ) 


dj  ■  Wjk 


Expression 


Wl2,ll 


-112  (-853  +  390  ci  +  286  c3  -  957  c5) 


w  12,12  26  c3  (—832  +  649  c3)  +  26  ci  (—649  +  466  c3  —  183  C5) 

+  3  (16357  +  c5  (29896  +  15125  c5)) 


u>i2,i3  7  (7392  +  3120  ci2  +  4290  c2  (-1  +  c3)  +  4800  c3 

+  429  c4  +  5104  c5  +  10208  c3  c5  -  2145  c4  c5 

—  26  Ci  (—32  +  32  c3  —  99  c4  —  99  c§)  +  858  (—2  +  5  c3)  cq) 


Wl2M 


1848  (1  +  c5) 


di3 


1 

10090080 


^13,0 


132  (293-  98  c6) 


u>i3,i  -143  ci  (64  +  329  c2)  +  1001  c2  (-21  +  86  c3) 

-  196  (-1848  +  208  c3  +  429  c4  +  1200  c5)  +  517242  c6 
—  42  (3367  c3  c4  +  5  C5  (—1131  c4  +  2299  c3)) 


u>i3)2  -105105  ci2  -  286  c3  (817  +  392  c2  -  294  c5) 

+  294  ci  (344  +  429  c3  -  520  c4  +  1320  c6) 

+  49  (26  c5  (-32  -  88  c2  +  120  c4  +  165  c5)  +  231  (33  +  32  c6)) 

wi3,3  -2002  c2  (42  +  11  c3  -  59  c5)  +  1568  (231  +  26  c5) 

+  390  c4  (-407  +  609  c5)  +  337491  c6 

+  286  c3  (32  +  189  c6)  +  105  ci  (832  c4  -  7  (320  +  473  c6)) 

u>i3i4  —91  Ci  ( — 2819  +  1232  c2  —  231  c3  —  1680  c4  +  2310  C5) 

+  21  c3  (-13539  +  6006  c3  +  7280  c4  -  18480  c6) 

+  11  (26  c5  (-593  +  392  c2  +  735  c5)  +  21  (1487  +  1568  c6)) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj ;  Wjk 


Expression 


uJi3,5  —143  ci  (64  +  119  c2) 

-  196  (- 1848  +  208  c3  -  429  c4  +  1200  c5)  +  199782  c6 

-  7  (143  c2  (-21  +  22  c3)  +  78  c4  (61  c3  +  115  c5)  +  26070  c5  c6) 


wi3,6  —637  ci  (229  +  176  c2  +  33  c3  —  240  c4  —  330  C5) 

-  147  c3  (1403  +  858  c3  -  1040  c4  +  2640  c6) 

+  11  (26  (817  +  392  c2  -  735  c5)  c5  +  1029  (33  +  32  c6)) 

w13,7  2002  c2  (42  +  43  c3  -  91  c5)  +  1568  (231  +  26  c5) 

-  390  c4  (-407  +  161  c5)  +  105  a  (-2240  +  832  c4  -  3025  c6) 

+  379533  c6  -  286  c3  (-32  +  189  c6) 


wi3,8  169598  c3 

+  7  (15015  ci2  -  182  (88  c2  (c3  +  c5)  +  3  c5  (22  c3  -  40  c4  +  55  c5)) 
-  6  ci  (-9272  +  3003  c3  +  3640  c4  -  9240  c6)) 

+  7  (21632  c5  +  33  (1487  +  1568  c6)) 


w13>9  362208  +  235200  c3  -  91  ci  (-448  +  352  c2  -  795  c4) 

-  21021  c4  -  33306  c3  c4  -  9152  c5 

-  286  c2  (-555  +  637  c5)  +  462  (958  +  837  c3  -  325  c5)  c6 


^13,10  143  ci  (899  +  784  c2  —  2205  C5) 

+  49  (2574  c32  +  52  c3  (16  +  44  c2  -  60  c4  -  33  c5) 

+  3  (2541  +  1403  c5  -  1040  c4  c5  +  176  (14  +  15  c5)  c6)) 


Wl3,ll 


16  (35362  +  4004  c2  -  10920  c4  +  43197  c6) 


wi3,i2  143  ci  (-451  +  784  c2  +  2205  c5) 

+  7  (-18018  c32  +  52  c3  (-416  +  308  c2  -  420  c4  +  231  c5) 

+  3  (16357  +  13539  c5  -  7280  c4  c5  +  1232  (14  +  15  c5)  c6)) 

( continues ) 
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Table  B.7:  Integral  approximation  Ij ,  n  =  14.  ( continued ) 


dj ,  Wjk  Expression 


wisps  362208  +  235200  c3  -  91  a  (-448  +  352  c2  -  1125  c4) 

+  21021  c4  -  141414  c3  c4  -  9152  c5 

+  286  c2  (-555  +  413  c5)  +  462  (594  +  603  c3  +  325  c5)  c6 


1013,14 

-132  (97  +  98  cq) 

d\4 

1 

630630 

1014,0 

1617 

1014,1 

-4  (286  ci  +  49  (-231  +  26  c3  +  150  c5)) 

1014,2 

14  (3201  +  2190  ci  -  286  c3  +  494  c5) 

1014,3 

4  (-7350  ci  +  286  c3  +  49  (231  +  26  c5)) 

1014,4 

14  (3201  +  494  ci  -  2190  c3  +  286  c5) 

1014,5 

-4  (286  ci  +  49  (-231  +  26  c3  +  150  c5)) 

1014,6 

14  (3201  +  494  ci  -  2190  c3  +  286  c5) 

1014,7 

4  (-7350  ci  +  286  c3  +  49  (231  +  26  c5)) 

1014,8 

14  (3201  +  2190  ci  -  286  c3  +  494  c5) 

1014,9 

196  (231  +  26  ci  +  150  c3)  -  1144  c5 

( continues ) 
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Table  B.7:  Integral  approximation  IJ}  n  =  14.  ( continued ) 


dj  5  Wj  k 

Expression 

1^14,10 

14  (3201  +  286  ci  -  494  c3  +  2190  c5) 

Wl4,ll 

70724 

Wl4,12 

14  (3201  +  286  ci  -  494  c3  +  2190  c5) 

W14.13 

196  (231  +  26  ci  +  150  c3)  -  1144  c5 

Wi4,14 

1617 
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Appendix  C 

Coefficients  for  second-order 
methods 


In  the  following  tables,  exact  coefficients  for  a  family  of  implicit  Chebyshev  methods 
for  the  numerical  integration  of  second-order  differential  equations  are  given.  These 
coefficients  for  even  degrees  2  <  n  <  14  are  used  to  recast  Eq.  (1.11),  such  that 


y(x  +  h4j)  =2 y(x) +  y(x -h£j)  +  Ij,  (C.l) 

where 

n 

1j  =  h2  d3  Y  wik  (/(**)  +  f(xk  ))  .  (c-2) 

k  =  0 

where  dj  represents  a  common  denominator  for  each  expression. 

The  constants  eg  appearing  in  Table  C.7  are  defined  in  Appendix  A,  Table  A. 8. 

Table  C.l:  Integral  approximation  Ij  for  n  =  2. 


dj  5  Wj  k 

Expression 

Wjk 

Expression 

di 

1 

Wi.1 

6 

96 

Wifi 

14 

Wl,2 

-1 

d>2 

1 

W2, 1 

1 

3 

W2,0 

1 

W2,2 

0 
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Table  C.2:  Integral  approximation  Ij  for  n  =  4. 


dj  5  Wj  k 

Expression 

Wjk 

Expression 

di 

1 

Wl,  2 

134  -  96  s/2 

1920 

Wifi 

66  -  30 

Wifi 

182  —  128  s/2 

wi,i 

10 

Wifi 

l-s/2 

d,2 

1 

W2,2 

10 

480 

W2fi 

18 

W2fi 

20  —  16  s/2 

W2, 1 

4  (5  +  4  V2) 

W2fi 

1 

ds 

1 

W3,2 

134  +  96  s/2 

1920 

W3fi 

6  (ll  +  5  V2) 

W3fi 

10 

W3fi 

182+  128  V2 

W3fi 

1  +  V2 

di 

1 

W4,2 

3 

15 

Wifi 

1 

W4fi 

2 -s/2 

tW4,l 

2  +  V2 

W4fi 

0 
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Table  C.3:  Integral  approximation  Ij  for  n  =  6. 


dj  5  Wj  k 

Expression 

Wjk 

Expression 

di 

1 

322560 

Wifi 

18206  —  10496  V3 

Wifi 

4706  -  2240 

Wifi 

6710  —  3884  y/z 

wi,i 

350 

Wifi 

17750  —  10240  y/Z 

Wifi 

25142-  14548 

Wifi 

49  —  32 

1 

322560 

W2fi 

-418 

w-lfi 

2466 

W2fi 

234 

W2, 1 

3530  +  2140 

W2fi 

3530  -  2140  V3 

W2fi 

1890 

W2fi 

81 

d3 

1 

10080 

W3fi 

70 

w3,o 

142 

W3fi 

-8 

W3,l 

40  ^7  +  4  V3) 

W3fi 

1 

O 

W3, 2 

568 

w3fi 

-1 

C?4 

1 

35840 

W4fi 

2286 

^4,0 

786 

W4fi 

210 

( continues ) 
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Table  C.3:  Integral  approximation  Ij,  n  =  6.  ( continued ) 


dj  5  Wj  k 

Expression 

Wjk 

Expression 

«>4,1 

90  ^17  +  10  Vsj 

W4,5 

3  (510-  300^) 

m,  2 

4122 

WAfi 

9 

1 

W5,3 

18206  +  10496 

322560 

w5,o 

4706  +  2240  V3 

W5,4 

6710  + 3884 

w5,i 

17750+  10240^ 

W5, 5 

350 

yj5,2 

25142  +  14548  V3 

W5fi 

49  +  32  x/3 

de 

1 

we, 3 

41 

315 

w6,o 

9 

We,  4 

18 

w6,i 

10  (2  +  Vtj 

W6,5 

-10  (-2  + V3) 

U>6,2 

54 

we,e 

0 

Table  C.4:  Integral  approximation  Ij 

for  n  =  8. 

dj  •>  ^ j  k 

Expression 

di 

1 

161280 

Wifi 

2( 

643  +  4  V2  -  315  1/2  +  V2) 

( continues ) 
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Table  C.4:  Integral  approximation  Ij,  n  =  8.  ( continued ) 


dj  i  VJjk 


Expression 


Wla  —6  ^-49  +  28  +  128  ^2  -  +  128  ^2  +  -  128  y4  (2  + 

Wl ’2  3256  V2+ 168  \] I  -  2  y/2-  11  ^-416  +  256  ^2  +  ^+145^2  (2  +  V^j 

Wl’3  30^+4  ^977  +  448  ^2  -  V2  -  448  \J  2  +  -  192  ^2  (2  + 


Wi,4 


5146  +  1544  -  3968  ^2  +  V^ 


™1,5  4  ^1391  +  701  -  448  \J2-V2  -  832  ^2+  -  192  (2  +  v7!^ 

Wl’6  1595  Y^^+Vi)  -  8  ^-572  +  297^+21^4-2^  +  352  \j2+V2 
Wl’7  2  ^2765  -  29  \/2  +  384  ^2  -  \/2  -  2176  ^2  +  \/2  +  384  ^2  (2  +  \/2) 


Wl,8 


3  +  4v/2-5  ^2+  \/i 


1 


^2,0 


40320 

324  -  160 


w2,i  1360  -  853  +  159  ^4  -  2  -  192  ^2  - 

+  448  \] 2+  V2  -  266  y4  (2  +  v7^ 


W2,2 


84 


( continues ) 
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Table  C.4:  Integral  approximation  Ij,  n  =  8.  ( continued ) 


dj  i  VJjk 


Expression 


W  2,4 


W2.3  592  -  427  V2  -  266  \A  -  2  \/2  +  448  \j  2  -  V2 

+  192  \J2  +  V2  -  159 


1412  —  992  -y/2 


w2,5  592  -  427  +  266  \j\-2\f2  -  448  2  -  V2 

-  192  \J2  +  V2  +  159 


^2,6 


1996  -  1408  \/2 


w2,7  1360  -  853  V2  -  159  \J I  -  2  V2  +  192  ^2  -  V2 

-  448  \J 2  +  V2  +  266  y4  (2  +  V^j 


^2,8 


1 


*+S,0 


161280 


-2  ^-643  +  4^  +  315  ^2- 


w3,i  4  ^1391  -  701  V2  +  192  \Jl-2V2  -  832  \J  2  -  V2  +  448 

w3.2  -168  y4  (2  +  +  11  ^416  +  216  V2  -  145  \J I  -  2  V2  -  256  \J 2  -  V^j 

w3,3  6  ^49  +  28  V2  —  128  \J\-2\f2  -  128  \J  2  -  V2  +  128  \J  2  + 

( continues ) 
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Table  C.4:  Integral  approximation  Ij ,  n  =  8.  ( continued ) 


dj  ■  Wjk 


Expression 


W3,4 

^3,5 

^3,6 

^3,7 

^3,8 

C?4 

^4,0 

W4,l 

W4,2 

W4,3 

W4,4 

W4,5 

W4,6 


5146  -  1544  V2  -  3968  \/2-V2 

2  ^2765  +  29  s/2  -  384  \j\-2\f2  -  2176  ^2- V2  -  384 \fl  + 

4576  -  3256  V2  +  1595  \J\-2^f2  -  2816  ^2-^2  +  168  ^2  (2 

—30  V2  +  4  ^977  +  192  \Jl-2\/2  -  448  \]  2~V2  -  448 \fl  + 

3-4v/2-5  \J2- V2 
1 

10080 

82 

-48  \J 2  —  \/2  +  56  ^3  +  2  \J 2  +  V^j 
4  ^63  +  44 

8  ^21  +  14  \J2-V2  +  6  a/^W fj 

42 

-8  ^—21  +  14  \j  2-V2  +  6  V^Wi) 

252  —  176  \/2 


( continues ) 
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Table  C.4:  Integral  approximation  Ij,  n  =  8.  ( continued ) 


dj ,  Wjk  Expression 


U>4,7 

8  (21  +  6\/2-  V2-U\/2  +  V2j 

W4,8 

1 

C?5 

1 

161280 

W  5,0 

1286  —  8  V2  +  630  \J2-V2 

^5,1 

—30  V2  +  4  ^977  —  192  \J \  —  2  \/2  +  448  \J 2  —  \/2  +  448  \J 2  +  V2^j 

W5,2 

168  ^2  (2  +  V2^j  +11  ^416  +  216  \[2  +  145  \Jl  —  2  V2  +  256  2  —  V^J 

W5,3 

2  ^2765  +  29  V2  +  384  \J I  -  2  V2  +  2176  \J2-  ^  +  384^2  +  V^j 

W5A 

5146  -  1544  V2  +  3968  \j 2-^/2 

W5,5 

6  ^49  +  28  V2  +  128  \j I  -  2  V2  +  128  \J 2  -  \[2  -  128  \j 2  +  V^j 

W5,6 

4576  -  3256  V2  -  1595  \j\-2^2p  2816  ^2  -  V2  -  168  ^2  (2  +  W) 

W5,7 

-4  ^—1391  +  701  V2  +  192  \j \  —  2  \[2  —  832  ^2  —  \[2  +  448  ^2  +  V2J 

W5,8 

3  -  4  V2  +  5  \J2  -  V2 

de 

1 

40320 

( continues ) 
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Table  C.4:  Integral  approximation  Ij ,  n  =  8.  ( continued ) 


dj  5  Wj  k 

Expression 

WG,0 

324  +  160  V2 

W6,l 

592  +  427  V2  -  159  \J I  -  2  \pl  -  192  \J  2  -  V2 

+  448  ^2  +  ^+  266  ^2 

(2  +  V2) 

W6,2 

4  (499  +  352  V2) 

We, 3 

1360  +  853V2  +  266\/l-2V2  +  U8\/2-V2 

+  192  \J2+  v/2+  159  ^2  ( 

2  +  V2) 

W6,4 

4  (353  +  248  V5) 

We, 5 

1360  +  853  %/2  -  266  \/4  -  2  -  448  \/2  - 

-192^2+^-159^/2  ( 

2  +  V2) 

W6,6 

84 

We, 7 

592  +  427  V2  +  159  \J A  -  2  V2  +  192  1/2  - 

-448^2  +  ^-  266  ^2 

(2  +  V2) 

We, 8 

2 

d>7 

1 

161280 

W7,0 

2  ^643  +  4  V2  +  315  ^2  +  x/2 

) 

( continues ) 
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Table  C.4:  Integral  approximation  Ij ,  n  =  8.  ( continued ) 


dj  ■  Wjk 


Expression 


wr, i 

W7,2 

W  7,3 

W7,4 

W  7,5 

W7,6 

W7,7 

W7,8 

dg 

u>8,0 

ws, l 

WS,2 

w  8,3 


-2  ^—2765  +  29-^/2  +  384  ^2-^-2176  ^2+  v/2  +  384 
3256  -  168  \jl-2V2  +  11  ^416  +  256  1/2  +  v/2  +  145 

4  ^1391  +  701  V2  +  448  \J2-V2  +  832  ^2+  +  192  ^ 

5146  +  1544  +  3968  \/2  +  V2 

30  v/2  +  4  ^977  -  448  ^2-  \/2  +  448  \]2+V2  +  192 

-2376  %/2+ 168  \Jl  —  2  v/2+ 11  ^416  +  256  \/2  +  v^- 145 

-6  ^—49  +  28  %/2  -  128  \j2-spl  -  128  ^2+  +  128  ^ 

3  +  4v/2  +  5y/2+ 

1 

315 

5 

20  —  6  -v/2  —  3  \J2-V2  +  7  \J2  +  V2 
11  (2  +  V2) 

20  +  6  \/2  +  7  \J2-V2  +  3  \j  2+  —\pl 


\  (2  +  x/2)  j 
1(2  +  ^ 
(2+^ 


2  +  x/2) J 
:  (2  +  ^2)^ 
(2+72)^) 


( continues ) 


147 


( continues ) 


148 


APPENDIX  C.  COEFFICIENTS  FOR  SECOND-ORDER  METHODS 


Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


dj  j  ^jk 


Expression 


Wh3  -4  ^—131931  +  13283  VZ  -  38400  \JlO  -  2  VZ 


Wl,5 


-  28544 


y4  ^5  +  VZ)  +  9856  ^10  (5  +  VZ) 


Wl-4  834974  +  374354  VZ  +  9900  ^50  -  10  VZ  +  8250  \J  10  -  2  %/5 

:^2  (5  +  V5) 


-  240212 


-  97558 


6  ^178759  +  18715  VZ  —  57984 


\/10 

(5  +  V5) 

\/2( 

'5  +  V5) 

Wl ’6  —2  ^-545487  +  53463  VZ  +  4950  ^50  -  10  VZ  +  4125  \JlD-2VZ 


148694 


y/2  (5  +  ^)  -  20619  y/lO 


Wl ’7  4  ^235331  +  88271  VZ  -  38400  \JlD-2VZ 


-  67968 


y/ 2  (5  +  v^)  -  9856  y/lO  (5  +  V5) 


W1.8  650724  -  238904  V5  -  9900  ^50  -  10  VZ  +  8250  \J  10-2VZ 

-  240212  y/2  (5  +  +  97558  ^10  (5  + 


Wl,9 


1060794  -  117542  VZ  +  78848 


-  346624 


39424 


y/ 10  (5  +  V5) 


Wi,iO 


7 


61  +  25  x/5  —  32  W2 


( continues ) 
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dj  j  ^jk 


Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


Expression 


w  2,0 


w  2,2 


W2A 


1 


35481600 


-350  (-389+  129  V5 


w2,i  529692  -  211000  V5  +  30800  ^50-10^5  -  61446  \J  10-2^ 

i  (5  + -  46650  y  10  (5  +  v^) 


115200 


-11550  -5  +  V5 


( 


w2,3  260962  -  118446  -  46650  ^50-10^  +  115200  \j  10-2^5 

+  61446  ^2  (5  +  -  30800  ^10  (5  +  ~V$) 


3800  -  240  V5 


w  2,5 


^2,6 


w2,8 


422442  -  189858 
-400  (-2307+  1030  V5 


w2,7  260962  -  118446  V5  +  46650  y^O-lOv7!!  -  115200  \J  ID-2VZ 

1  y4  (5  +  Vt)  +  30800  ^10  (5  +  Vt) 


-  61446 


823750  -  367910  V5 


W2’9  -211000  -  30800  ^50  -  10  Vb  +  6  ^88282  +  10241  \JlD-2Vb 


-  19200 


^2  (5  +  Vt)  +  7775  ^10  (5  +  V5) 


( continues ) 
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Table  C.5:  Integral  approximation  Ij,  n  =  10.  ( continued ) 


( continues ) 
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dj  j  ^jk 


Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


Expression 


W3’7  2  ^530397  +  58771  VE  -  19712  ^50  -  10 


^3  io 


C?4 


m,o 


-  173312  \J\D  —  2 1/5  -  39424  (5  + 


w3,s  834974  -  374354  V5  +  97558  y^O-lOv7!!  -  240212  \j  10  -  2 
^2  (5  +  75)  +  9900  ^10  (5  +  Vb) 


-  8250 


W3’9  4  ^131931  +  13283  V5  +  9856  y^O-lOv7!! 


-  28544  \Jl0  —  2  1/5  -  38400  y4  (5  + 
-7  ^—61  +  25  V5  +  32  ^  10-2 


1 


1419264 
9030  -  1778  V5 


41650  -  13858  V5  +  1232  ^50  -  10  V5  -  3850  \J  10  -  2 

y4  (5  +  Vtj  -  1866  y/l0  (5  +  Vt) 


W4,2 


7680 


43160  —  4496  VZ 


W4.3  20860  —  3848  V5  —  1866  ^50-10^+  7680  \JlD-2Vb 

+  3850  ^2  (5  +  Vt)  -  1232  ^jwJb  +  Vtj 


W4,4 


462  (5  +  V5 


{continues) 
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dj  j  ^jk 


Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


Expression 


M+5 


44730  -  20238  VE 


^4,6 


53430  -  23786  VE 


w4,7  20860  —  3848  VE  +  1866  ^50  -  10  -  7680  \J  10-2^ 

-  3850  y4  (5  +  +  1232  ^10  (5  + 


W+8 


59440  -  26528  VE 


w4,9  41650  -  13858  VE  -  1232  ^50  -  10  VE  +  3850  \JlO~2VE 

1  ^10  (5  + 


W4.10 


Y^2  (5  + 


—  7680  \  2  5  +  V5  +1866 


7(5  +  v  5 


( 


1 


554400 


^5,0 


^5,1 


W5,2 


^5,3 


7^5,4 


2786 


2400 


y/ 2  (5  +  75)  -  308  ^—27  +  3^+4 \jlD-2VE 


4  (2579+  1171  V5 


4  ^2079  +  231  VE  +  600  \JlQ  -  2  VE  +  308  y/ 2  (5  + 


6316  +  2836^ 


( continues ) 
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Table  C.5:  Integral  approximation  Ij,  n  =  10.  ( continued ) 


dj  j  ^  'jk 


Expression 


^5,5  1386 

w5< 6  10316  —  4684 


W5,7 

W5,8 

W5,9 

1^5,10 

C?6 

^6,0 

U>6,1 


W6,2 


^6,3 


^6,4 


4  ^2079  +  231  \/5  —  600  \JlD  —  2  V5  —  308  2  (5  + 


6316  —  2836  V5 


-2400 


(5  +  V5)  -  308  ^—27  +  3  \/5  -  4  \J  10  -  2 


-7 


1 


35481600 


350  (389  +  129  V5 
2  ^130481  +  59223  V5  -  15400  ^50-  lOv^  -  30723  \jlD-2VZ 


57600 


y 2  (5  +  V5)  +  23325  ^10  (5  +  V5) 


( 


400  2307  +  1030  V5 


2  ^264846  +  105500  VI  +  23325  ^50-  lOv^  +  57600  i/lO-  2\/5 


30723 


^2  (5  +  75)  +  15400  ^10  (5  +  \/H) 


823750  +  367910  V5 


(' continues ) 
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Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


dj  j  ^jk 


Expression 


*+>,5 


6  70407  + 31643  V5 


W  6,6 


( 


11550  5  +  V5 


W6'7  2  ^264846  +  105500  Vb  -  23325  ^50  -  10  Vb  -  57600  \JlD-2Vb 


-  30723 


(5  + -  15400  y/lO  (5  +  V5) 


W+,8 


( 


40  95  +  6  V5 


U'6’9  2  ^130481  +  59223  Vb  +  15400  ^50  -  10  V5  +  30723  \/l0  -  2  V5 


-  57600 


(5  +  -  23325  ^10  (5  +  v7!^ 


wgaq 


( 


175  5  +  v  5 


d  7 


1 


35481600 


14  ^12861  -  25  +  3168  \JlO  -  2 


W7a  4  ^131931  +  13283  V5  -  9856  ^50  -  10  V5 


28544  y/10-2v/5  +  38400  y4  (5  +  V7!^ 


W7’2  2  ^545487  +  53463  +  20619  ^50  -  lOv^  +  148694  \/l0  2  x/5 


-4125 


+  4950  ^10  (5  +  V5) 


( continues ) 
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dj  j  ^jk 


Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


Expression 


W7'3  2  ^530397  +  58771  VE  +  19712  ^50  -  10 


w  7,5 


W710 


+  173312  \J\D  —  2  \/5  +  39424  (5  + 


W7-4  650724  +  238904  V5  +  97558  y^O-lOv7!!  +  240212  \j  10  -  2 

2  (5  +  Vt)  +  9900  ^10  (5  +  Vt) 


8250 


6  ^178759  -  18715  V5  +  57984  \J  10-2  V^j 


W7'6  -2  ^-453362  +  121188  V5  +  20619  \/ 50  -  10  V5 

-  148694  \J\Q  —  2  x/5  +  4125  y4  (5  +  v7!^  +  4950  10  (5  + 

W 7,7  154  ^201  +  75  +  256  ^50-10-^ 

+  256  \/ 10-2^5  -  512  y/2  (5  +  -V/5) 


w7,s  834974  -  374354  V5  -  97558  y^O-lOv^  +  240212  \J\Q-2VZ 
+  8250  ^2  (5  +  V5)  -  9900  ^10  (5  + 

W 7,9  —4  ^-235331  +  88271  +  9856  ^ 50  -  10  V$ 

-  67968  \jlQ  —  2  y/5  +  38400  ^2~(V+Vtj 

7  ^61  -  25  V5  +  32  \J  10-2 


(1 continues ) 
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dj  j  ^jk 


Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


Expression 


^8,0 


1 


1419264 


9030  +  1778  Vb 


w 8'1  20860  +  3848  Vb  —  1232  ^50  -  10  Vb  -  3850  \J  10-2^ 

i  ^2  (5  +  +  1866  ^10  (5  + v7!^ 


W  8,2 


7680 


53430  +  23786  Vb 


W8'3  2  ^20825  +  6929  Vb  +  933  ^50  -  10  Vb  +  3840  \JlD-2Vb 


w8, 4 


w  8,5 


w  8,6 


1925  2  (5  +  +  616  y^lO  (5  +  Vb^j 


16  (3715+  1658  V5 
6  (7455  +  3373  Vb 
43160  +  4496  Vb 


W8’7  2  ^20825  +  6929  Vb  -  933  ^50  -  10  Vb  -  3840  \/l0  -  2  Vb 


W  8,8 


1925  y4  (5  +  Vb)  -  616  10  (5  +  Vb) 


( 


-462  (  —5  +  Vb 


w8.9  20860  +  3848  Vb  +  1232  ^50  -  10  +  3850  \JlD-2Vb 

-  7680  ^2  (5  +  Vb)  -  1866  ^  10  (5  + 


( continues ) 
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dj  j  ^jk 


Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


Expression 


ws,io 


W9,0 


U>9,5 


-7  -5  + V5 


1 


35481600 


14  f 12861  +  25  v/5  +  3168  ^2  (5  + 


W'9,1  -2  ^-530397  +  58771  Vb  +  39424  \JlD-2Vb 


-  173312 


y4  (5  + V7!!)  +  19712  y/io  (5  +  V5) 


W9’2  2  ^453362  +  121188  Vb  -  4950  ^50  -  10  V5  +  4125  \JlD-2Vb 


148694 


(Wv7!^  +  20619  ^10  (5  +  v^) 


U’9’3  4  ^235331  +  88271  V$  +  38400  \JlD-2VZ 


67968 


2  (Wv7!^  +  9856  y^lO  (5  +  V5) 


w9.4  834974  +  374354  V5  -  9900  ^50-  lOv7!!  -  8250  \J  10-2^ 

+  240212  y4  (d  +  Vtj  +  97558  ^10  (5  +  v7!^ 


6  ^178759  +  18715  +  57984  ^2  (5  + 


^9.6  1090974  -  106926  +  9900  y^O-lOv7!!  +  8250  \J IQ -2  VI 

+  297388  ^2(h  +  Vt)  -  41238  ^JlO~(V+Vtj 


( continues ) 
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Table  C.5:  Integral  approximation  Ij ,  n  =  10.  ( continued ) 


dj  j  ^jk 


Expression 


W9'7  4  ^131931  -  13283  \/5  -  38400  \J  10-2^5 


■  28544 


^2  ^5  +  Vb)  +  9856  ^10  (5  +  V5) 


w9,s  650724  -  238904  V5  +  9900  ^50-  lOv^  -  8250  \JlQ-2\/b 

\  y/2  (5  +  vtj  -  97558  ^10  (5  +  V5) 


w9, 9 


«>9,10 


*10 


240212  ■ 


—154  ^—201  +  75  V5  -  512  \j\D-2VZ 


256  y4  (5  +  Vtj  +  256  sj  10  (5  + 


7  61  +  25  v/5  +  32 


1 


2  (5  + 


17325 


W40.0 


175 


twio.i 


Wio,2 


Wl0,3 


754  -  154  \/5  -  77  \j\D-2Vl>  +  150  (5  + 


25  (47  +  5  V5 


754  +  154  +  150  \JlQ-2V^  +  77  ^2  (5  + 


^10,4 


925  +  345  V5 


U>10,5 


1359 


( continues ) 
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Table  C.5:  Integral  approximation  Ij,  n  =  10.  ( continued ) 


dj  5  Wj  k 

Expression 

WlOfi 

25  (47  -  5  -v/5 ) 

WlO,7 

754  +  154  V5  -  150  \/l0  -  2  V5  -  77  ^ 

2  (5  +  V5) 

WlOfi 

925  -  345  Vb 

WlOfi 

754  —  154  Vb  +  77  y^lO  —  2  Vb  —  150  ^ 

2  (5  +  Vb) 

WiQfiO 

0 

Table  C.6:  Integral  approximation  Ij  for 

n  =  12. 

dj  i  Wj  k 

Expression 

di 

1 

276756480 

Wifi 

—48  (-20198  +  5005  \/2-54\/3  +  5005 

wi,i 

-13728  (—17  +  9  y/sj 

Wifi 

11  (378646  +  61123  V2  -  194832  V3  - 

52111^6) 

Wifi 

4  (1120088  +  9728  V2  -  9447  -  456192  V^j 

Wifi 

-11  (-378646  +  267971  y/2  -  218864  V3  +  154737  V^j 

Wifi 

16  (244901  +  99872  V2  -  81653  - 

99872  Vg) 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

Wifi 

9667086  -  2626719  +  1064016  -  3182703  V6 

Wifi 

3899462  -  2756608  V2  +  1317506  V3  -  931840  V& 

Wifi 

-32  (-172555  +  70808  V2  -  58321  V3  +  70808  Vff) 

Wifi 

2  (3377373  -  1397760  V2  +  1140637  V3  -  1378304  VQ ) 

WlfiO 

1815054  -  1299297  V2  +  1064016  V3  -  743313  V6 

Wlfil 

-16  (-424107  +  299616  V2  -  141025  V3  +  99872  V6) 

Wlfi2 

-24  (-38  +  35  V2  -  54  +  35  V^j 

d2 

1 

276756480 

W2fi 

864  (ll23  —  560 

W2, 1 

7678608  -  1520593  V2  -  4304518  V3  +  970017  V6 

W2fi 

44  (179199-  103424^) 

W2fi 

7678608  +  1520593  V2  -  4304518  V3  -  970017  VQ 

W2, 4 

123552 

W2fi 

32  (172545  +  99872  V2  -  99872  -  57801  V^) 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

W2fi 

10733958-  6190182  V3 

U>2,7 

2087568  -  1481681  V2  -  1208698  V3  +  854751 V6 

W2, 8 

32  ^245457-  141616 Vs'j 

W2, 9 

2087568  +  1481681  V2  -  1208698  V3  -  854751  V6 

W2,10 

54  (53369  -  30775 

W2.ll 

-32  (-172545  +  99872  V2  +  99872  -  57801  V& ) 

W2.12 

1296 

d3 

1 

17297280 

w3, 0 

60594  -  30030  V2 

w3,l 

282380  -  173504  V2  -  141850  V3  +  115264  V6 

w3, 2 

-22  (-11177  +  6464  V2  +  6464  -  3736  V6 ) 

w3,3 

242484  -  171072  V2  -  1930  V3  +  1216  V& 

W3,4 

-22  (-11177  +  6464  V2  -  6464  V3  +  3736  Vdj 

W3,5 

14586 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

W  3,6 

591162  —  419556 y/2 

W  3,7 

242484  -  171072  V2  +  1930  -  1216  V& 

W3,8 

400022  -  283232  V2 

W3,9 

282380  -  173504  V2  +  141850  V3  -  115264  V6 

U>3,10 

100410  —  71196 \/2 

U>3, 11 

565190  —  399488  V% 

W3t12 

57  —  105  V2 

d  4 

1 

276756480 

^4,0 

491616 

W4,l 

509296  +  383665  V2  +  315770  V3  +  212949  V& 

W4, 2 

-418  (-4013+  2305^) 

^4,3 

509296  -  383665  +  315770  V3  -  212949  V& 

W4, 4 

418  (4013  +  2305 

W4,5 

32  (40583  +  28915  V2J 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

W4fi 

370656 

U>4,7 

509296  -  383665  V2  -  315770  V3  +  212949  V6 

W4,8 

26720 

W4,9 

509296  +  383665  V2  -  315770  -  212949  V6 

W4, 10 

12204 

«>4,11 

1298656  —  925280 y/2 

W  4,12 

3888 

1 

276756480 

W5,0 

48  (20198  +  5005  V2  -  54  -  5005 

W5,l 

2  (1949731  +  1378304  V2  -  658753  V3  -  465920  Vtj 

W5,2 

11  (378646  +  267971  V2  -  218864  -  154737 

W5,3 

2  (3377373  +  1397760  V2  -  1140637  V3  -  1378304 

W5,4 

-11  (-378646  +  61123  V2  -  194832  V3  +  52111  Vg) 

W5,5 

16  (424107  +  299616  V2  -  141025  V3  -  99872  V6j 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

W  5,6 

3  (3222362  +  875573  y/2  -  354672  -  1060901  V6) 

W5,7 

13728  (l7  +  9V3) 

W5,8 

32 

(172555  +  70808  V2  -  58321  y/z  -  70805 

iV6) 

W5,9 

4  I 

^1120088  -  9728 \/2  +  9447  Vz  -  456192 

Ve) 

W  5,10 

1815054  +  1299297  V2  -  1064016  \/5  -  743313  V6 

1^5,11 

-16 

(-244901  +  99872  V2  -  81653  V3  +  99872  V& ) 

«>5,12 

24  (38  +  35  V2  -  54  -  35  Vtj 

c?g 

1 

4324320 

^6,0 

15282 

W6,l 

16  (2145-  19  ^+891  V6) 

^6,2 

-176  (—351  +  202 y/z'j 

W  6,3 

16  (2145  +  19  V2  -  891  \/6) 

^6,4 

176  (351  +  202^) 

^6,5 

4  (l7589  + 12484  W) 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

W  6,6 

123120 

We, 7 

16  (2145  +  19v/2  +  891^6) 

We, 8 

7722 

W6,9 

-16  (-2145  +  19  V2  +  891 

We, 10 

432 

we, ii 

70356  -  49936  V2 

we, 12 

81 

d7 

1 

276756480 

W7,0 

-48  (-20198  +  5005  y/2  +  54  y/Z  -  5005  Vtj 

w7,l 

2  (3377373  -  1397760  V2  -  1140637  y/Z  +  1378304 

w7,2 

-11  (-378646  +  267971  y/2  +  218864  -  154737 

W7,3 

3899462  -  2756608  y/2  -  1317506  V3  +  931840  V& 

W7,4 

11  (378646  +  61123  y/2  +  194832  +  52111  y/6) 

W7,5 

16  (244901  +  99872  V2  +  81653  +  99872 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

W  7,6 

9667086  -  2626719  -  1064016  V3  +  3182703  V6 

W  7,7 

4  (ll20088  +  9728  V2  +  9447  +  456192  V6j 

W7,8 

-32  (-172555  +  70808  V2  +  58321  -  70808  Vq ) 

W7,9 

13728  (l7  +  91/3) 

W7,10 

1815054  -  1299297  V2  -  1064016  V3  +  743313  V6 

W7.ll 

-16  (-424107  +  299616  V2  +  141025  -  99872  V^j 

W7.12 

-24  (-38  +  35  \/2  +  54  \/3  -  35  \/6) 

1 

10250240 

w8,o 

54048 

W8,l 

-9  (-24784  +  1739  +  6370  -  6633  Vlf) 

w8, 2 

230670  -  132858  V3 

w8, 3 

9  (24784  +  1739  V2  -  6370  -  6633 

W8,4 

198  (ll65  +  671  Vs'j 

W8,5 

288  (989  +  703  V2) 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

W  8,6 

582084 

W  8,7 

9  (24784  +  1739  V2  +  6370  +  6633  Vdj 

^8,8 

336672 

W8, 9 

-9  (-24784  +  1739  y/2  -  6370  +  6633  V^j 

«>8,10 

13728 

«>8,11 

-288  (—989  +  703  V2j 

^8,12 

144 

1 

17297280 

^9,0 

60594 + 30030 V2 

W9,l 

242484  +  171072  V2  -  1930  -  1216  V& 

Wg,2 

22  (lll77  +  6464  V2  -  6464  -  3736  \/6 ) 

W  9,3 

282380  +  173504  V2  -  141850  V3  -  115264  V& 

^9,4 

22  (lll77  +  6464  V2  +  6464  +  3736  V6j 

^9,5 

565190  +  399488  V% 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

W  9,6 

6  (98527  +  69926^) 

W  9,7 

282380  +  173504  V2  +  141850  V3  +  115264  V6 

W  9,8 

2  (200011  +  141616  v7^) 

W9, 9 

242484  +  171072  V2  +  1930  V3  +  1216  V& 

Wg.io 

6  (16735  +  11866^) 

twg.n 

14586 

1^9,12 

57  +  105 

^10 

1 

276756480 

^10,0 

864  (ll23  +  560  V3) 

^10,1 

2087568  +  1481681  V2  +  1208698  V3  +  854751  V& 

^10,2 

123552 

W10, 3 

2087568  -  1481681 V2  +  1208698  V3  -  854751 V& 

tUlO,4 

44  (l79199+  103424  v7^) 

^10,5 

32  (172545  +  99872  V2  +  99872  v7^  +  57801  V6") 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

Wl0tG 

162  (66259  +  38211  y/3j 

WlO,7 

7678608  +  1520593  V2  +  4304518  V3  +  970017  V& 

Wl0,8 

32  ^245457+  141616 \/3) 

Wl0,9 

7678608  -  1520593  V2  +  4304518  V3  -  970017  V& 

Wl0,10 

54  (53369  +  30775  W) 

Wio.ll 

-32  (-172545  +  99872  V2  -  99872  V3  +  57801 

Wl0,12 

1296 

du 

1 

276756480 

Wllfi 

48  (20198  +  5005 ^+54^3  +  5005 

Wns 

4  (1120088  -  9728  V2  -  9447  +  456192  V^j 

w  11,2 

-11  (-378646  +  61123  \f2  +  194832  V3  -  52111  \/tj 

wn,3 

-13728  (—17  +  9  Vsj 

Wli,4 

11  (378646  +  267971  V2  +  218864  +  154737  Vdj 

Wut5 

16  (424107  +  299616  V2  +  141025  V3  +  99872  V6) 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

tUll,6 

3  (3222362  +  875573  V?  +  354672  +  1060901  VH) 

Wll,7 

2  (3377373  +  1397760  V2  +  1140637  V3  +  1378304  V&) 

Wll,8 

32  (172555  +  70808  V2  +  58321  +  70808 

Ve) 

Wll,9 

2  (1949731  +  1378304  V2  +  658753  Vs  +  465920  Ve) 

Wll.10 

1815054  +  1299297  V2  +  1064016  V3  +  743313  V6 

tWll, 11 

-16  (-244901  +  99872  V2  +  81653  -  99872  Vtf) 

tWll, 12 

24  (38  +  35  V2  +  54  y/z  +  35  V&) 

di2 

1 

135135 

Wl2,0 

945 

Wl2,l 

5384  -  19  y/2  -  1820  +  891  V& 

Wl2,2 

-2222  (-2  +  Vs) 

Wl2,3 

5384  +  19  V2  -  1820  -  891  V& 

Wi2,i 

2222  (2  +  VE) 

Wl2,5 

3121  (2  +  V2) 

( continues ) 
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Table  C.6:  Integral  approximation  Ij,  n  =  12.  ( continued ) 


dj  5  Wj  k 

Expression 

Wl2,6 

11502 

Wl2,7 

5384  +  19  V2  +  1820  +  891 V6 

Wl2,8 

8851 

Wl2,9 

5384  -  19  V2  +  1820  -  891  V& 

Wl2,10 

3834 

Wl2, 11 

-3121  (-2  +  v/2) 

W\2,\2 

0 

Table  C.7:  Integral  approximation  Ij  for  n  =  14. 


dj  j  Wj  /,■ 


Expression 


322882560 

66  (12561 +  49  c5  -  12480  c6) 

twi.i  -2  (188188  ci2  +  156156  c22  +  11  (-197253  +  896  c4  (112  +  39  c4)  +  27603  c5) 

+  940800 c6- 572 ci  (-147+273 c3+128 c6) -104c2  (-1920  +  2128c4+1617c6) 

+  4  (55328  c32  +  245280  c52  -  3003  c3  (-35  +  32  c5) 

-  56  (1456  c3  +  7383  c4  +  8400  c5)  c6  +  551694  c62)) 

(■ continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


-2  (-49  (52  c3  (22  c3  -  3  (283  +  30  c4))  +  55  (847  +  19  c5) 

+  52  (2  (32  c3  -  66  c4  -  45  c5)  c5  +  11  c2  (-1  +  2  c5))) 

-  8  (296725  c3  +  49  (-7623  +  2647  c5))  c6 

+  4  ci  (-195186  +  21021  c2  +  33761  c3  -  26754  c4  -  228193  c5  +  412482  c6)) 


tw1)3  2  (88088  c22  -  7  (12584  c32  -  52  c3  (231  +  608  c5) 

+  3  (-103323  +  104  c4  (896  +  115  c4)  +  c5  (-54703  +  11960  c5))) 

-308 c2  (3584+1248 c4-4047c6) -32  (96792  +  2288 c3-73125 c4+10192 c5)  c6 
+  168168  c62  +  4  ci  (-257994  +  80353  c3  -  262297  c5  +  470400  c6)) 


tui,4  -2  (-2026409  +  28028  ci2  +  1479624  c3  +  28028  c2  (-1  +  3  c3) 

+  897603  c5  +  392  (-273  c3  (c3  +  c4)  +  (2543  c3  +  585  c4)  c5) 

+  2747976  c6  -  8  (284319  c3  +  232661  c5)  c6 

+  28  ci  (-62249  +  2002  c2  -  5824  c3  -  12012  c4  +  7189  c5  +  68674  c6)) 


-2  (188188  ci2  -  156156  c22  -  11  (197253  +  896  c4  (112  +  39  c4)  -  27603  c5) 

+  4854528  c6  -  572  ci  (-147  +  273  c3  +  128  c6) 

+  104  c2  (-1920  +  2128  c4  +  1617  c6)  +  4  (55328  c32  +  24  5  2  80  c52 

—  3003  c3  (—35  +  32  C5)  —  56  (1456  c3  -  7383  c4  +  8400  c5)  c6  -  551694  c62)) 


wlt6  -2  (28028  c2  +  780744  c3  +  196  (143  ci2  -  39  c3  (11  c2  +  14  (c3  -  c4)) 

+  2  (2543  c3  -  585  c4)  c5  +  ci  (3377  -  286  c2  -  832  c3  +  1716  c4  +  1027  c5)) 

-  8  (129703  ci  +  206241  c3  -  296725  c5)  c6  -  49  (58701  c5  -  847  (-55  +  72  c6))) 


wh 7  2  (-88088  c22  +  21  (103323  +  104  c4  (896  +  115  c4)  +  54703  c5) 

+  308  c2  (3584  +  1248  c4  -  4047  c6)  -  2697984  c6 

+  4  ci  (-257994  +  80353  c3  -  262297  c5  +  470400  c6) 

-  52  (7  (11  c3  (-21  +  22  c3)  -  608  c3  c5  +  690  c52) 

+  8  (176  c3  +  5625  c4  + 784  c5)  c6  +  3234c62)) 


( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


wi,8  2  (7  (52  c3  (154  c3  +  15  (295  +  42  c4))  +  11  (26317  +  31897  c5) 

—  364  (11 C2  (—1  +  2  C5)  +  2  C5  (—32  c3  —  66  c4  +  45  C5))) 

+  4  ci  (369906  +  21021  c2  -  33761  c3  -  26754  c4  +  228193  c5  -  568638  c6) 
-  8  (343497  +  232661  c3  +  240359  c5)  c6) 


toi,9  -2  (68068  ci2  -  1031976  c3  +  312  (640  -  427  c4)  c4 

-  1092  c2  (1792  +  87  c4)  -  77  (28179  +  8367  c5  -  23296  c6) 

-  364  ci  (1155  +  608  c3  -  1207  c5  -  896  c6)  +  8  (427  c3  (39  c3  -  313  c5) 
+  (286858  c2  +  235200  c3  -  143  (483  c4  +  64  c5))  c6  +  175329  c62)) 


101,10  2  (28028  ci2  +  1493841  c5  -  28028  c2  (1  +  2  c3  +  3  c5)  -  196  (832  c32 

-  c3  (3377  +  1716  c4  +  624  c5  -  5294  c6)  -  6  c5  (91  c4  +  800  c5  -  1403  c6)) 

-  41503  (-55  +  72  c6)  -  52  ci  (539  c3  -  147  (283  +  30  c4)  +  45650  c6)) 


101.11  2  (2865423  +  256256  ci  -  442624  c3  +  1960623  c5  -  4526336  c6) 

101.12  2  (2026409  +  28028  d2  +  2192721  c5  +  28028  c2  (1  +  2  c3  +  3  c5) 

-  52  ci  (30975  +  539  c3  +  4410  c4  -  35794  c6)  -  2747976  c6  -  28  (5824  c32 
+  c3  (62249  + 12012  c4- 4368  c5- 68674  c6)  + 6  c5  (637  c4  -  5600  c5  + 13539  c6))) 

zoi,i3  -2  (68068  ci2  +  312  c4  (-640  +  427  c4)  -  77  (28179  +  8367  c5  -  51968  c6) 

+  52  c2  (37632  +  1827  c4  -  44132  c6)  -  364  ci  (1155  +  608  c3  -  1207  c5  -  896  c6) 

+  8  (16653  c32  +  11  (6279  c4  -  832  c5  -  15939  c6)  c6 
+  c3  (-128997  -  133651  c5  +  235200  c6)) ) 

ioi,i4  33  (17  +  49  C5  —  64  cq) 


322882560 

to2jo  —3234  (—257  +  c3  +  256  C5) 

(1 continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


to2,i  -2  (56056  ci2  -  156  c2  (-1335  +  539  c3  +  1078  c5) 

-  52  ci  (-1617  +  2058  c2  +  3136  c3  -  6468  c4  +  219  c5  +  4410  c6) 

-  49  (4680  c32  +  c3  (5973  -  1144  c4  -  13116  c5)  +  88  c4  (-256  +  321  c5) 

+  3  (14861  +  8  c5  (-3355  +  1600  c5  -  1859  c6)  +  13312  c6))) 

w2,2  14  (315403  +  38064  ci2  +  4  Cl  (25173  +  28501  c3  -  80558  c5) 

+  19  c3  (-10277  +  15964  c5)  +  4  c5  (-130361  +  40149  c5)) 

io2)3  -2  (107016  ci2  +  4312  c2  (256  +  13  c3  -  321  c5) 

+  392  ci  (2673  +  858  c2  +  2257  c3  +  585  c4  -  4384  c5  -  273  c6) 

+  3  (49  (-14861  +  13312  c4  +  16852  c5)+ 2548  c5  (-286  c4  +  39  c5  -  22  c6) 

+  69420  c6  +  c3  (115908  c5  -  539  (493  +  52  c6)))) 


W2,4 


14  (295955  +  248996  Cl  +  23296  ci2  -  123367  c3  -  23296  a  c3 

-  117852  c32  -  4  (155667  +  72727  ci  -  81234  c3)  c5  +  259116  c52) 


■102,5  —2  (56056  ci2  +  156  c2  (-1335  +  539  c3  +  1078  c5) 

+  52  ci  (1617  +  2058  c2  -  3136  c3  -  6468  c4  -  219  c5  +  4410  c6) 

-  49  (4680  c32  +  c3  (5973  +  1144  c4  -  13116  c5)  -  88  c4  (-256  +  321  c5) 

+  3  (14861  -  13312 c6  +  8 c5  (-3355  +  1600 c5  +  1859 c6)))) 

102.6  -14  (-315403  +  86528  ci2  -  13081  c3  +  162468  c32 

+  4  ci  (23639  +  21632  c3  -  52265  c5)  -  117852  (-1  +  2  c3)  c5  +  351780  c52) 

102.7  —2  (107016  ci2  -  147  (14861  +  5423  c3  +  13312  c4  -  16852  c5) 

-  392  ci  (-2673  +  858  c2  -  2257  c3  +  585  c4  +  4384  c5  -  273  c6) 

-  208260  c6  +  4  (-1078  c2  (256  +  13  c3  -  321  c5) 

+  39 c5  (2229 c3  +  14014 c4  +  1911  c5)  +  21021  (c3  +  2  c5)  c6)) 


102,8  14  (295955  +  217692  ci  +  324425  c3  +  141148  ci  c3 

-  4  (35893  +  75410  ci  +  70603  c3)  c5  -  267612  c52) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w2, 9  -2  (163072  ci2  +  3  (-49  (14861  +  13312  c2  +  c3  (11979  +  6400  c3)) 

-52  (-1335  + 539  c3)  c4  +  196  (5071  +  3718  c2  + 3200  c3- 286  c4)  c5  -  39468  c52) 
-  4312  (256  +  13  c3  -  321  c5)  c6 
-  2548  ci  (165  +  90  c2  -  48  c3  +  42  c4  -  139  c5  +  132  c6)) 

w2,i o  14  (315403  +  48464  Ci2  +  48464  c32  +  52  Cl  (5943  +  1664  c3  -  6033  c5) 

+  c3  (208329  +  1872  c5)  -  12  c5  (27183  +  19642  c5)) 

w2,u  98  (59103  +  6656  a  +  38433  c3)  -  9199104  c5 

w2,i2  -14  (-295955  +  23296  ci2  -  23296  c32  +  c3  (154671  -  385464  c5) 

+  52  ci  (4425  +  448  c3  -  4983  c5)  +  12  c5  (14573  +  27078  c5)) 

W2,13  -2  (163072  Cl2  -  15288  c2  (-128  +  143  c5) 

+  3  (-49  (14861  +  c3  (11979  +  6400  c3))  +  52  (-1335  +  539  c3)  c4 
+  196  (5071  +  3200  c3  +  286  c4)  c5  -  39468  c52)  +  43  1  2  (256  +  13  c3  -  321  c5)  c6 
+  2548  ci  (-165  +  90  c2  +  48  c3  +  42  c4  +  139  c5  +  132  c6)) 

w2,i4  -1617  (-1  +  c3) 


322882560 

w3fi  66  (12561  +  49  ci  -  12480  c4) 

w3t i  2  (-133224  c22  +  Ci  (644259  +  439348  c3  +  73216  c4  -  1069208  c5) 

-  11  (7  (-28179  +  52  c3  (105  +  17  c3)  +  51968  c4)  +  93816  c5) 

+  56  (25047  c42  +  33600  c4  c5  -  2379  c52  +  208  c3  (28  c4  +  19  c5)) 

+  156  c2  (-1280  +  3542  c4  -  609  c6)  +  1956864  c6  -  2294864  c4  c6) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w3,2  2  (940800  ci2  +  28028  c32  +  52  c3  (4410  c2  +  45650  c4  -  49  (849  +  11  c5)) 

-  3  ci  (-497947  +  35672  c2  +  549976  c4  +  40768  c5  -  28028  c6) 

+  49  (8  c4  (-7623  +  2647  c5)  +  11  (4235  +  52  c6) 

-  4  c5  (3377  -  1716  c2  +  832  c5  +  286  c6))) 


-2  (981120  ci2  -  384384  c22  +  21  (-103323  +  231168  c4  -  20020  c5) 

+  ci  (-1881600  c4  +  33  (9201  +  11648  c5))  +  199680  c6 

+  52  (3619  c32  -  42438  c42  +  11  c3  (-147  +  128  c4  -  273  c5)  +  6272  c4  c5 
+  4256  c52  -  3234  c4  c6  -  3003  c62)  -  224  c2  (7383  c4  -  4  (1232  +  247  c6))) 


w3A  -2  (229320  ci2  +  4  (-26  c5  (2205  c2  +  17897  c4  +  539  c5) 

+  c3  (369906  +  26754  c2  -  568638  c4  +  33761  c5  -  21021  c6)) 

+  7  ci  (-350867  +  48048  c2  +  130396  c3  +  274696  c4  +  23296  c5  -  8008  c6) 
+  7  (-289487  +  392568  c4  +  230100  c5  +  4004 c6)) 


w3, s  2  (312  c2  (640  +  427  c2)  +  Ci  (644259  +  439348  c3  +  73216  c4  -  1069208  c5) 

-  11  (-197253  +  38220  c3  +  163072  c4  +  93816  c5)  -  28  (2431  c32 

—  416  c3  (28  c4  +  19  c5)  +  6  (253  c4  (13  c2  +  33  c4)  -  11200  c4c5  +  793  c52)) 
-  1956864  c6  +  52  (1827  c2  +  44132  c4)  c6) 


u.%6  -2  (229320  ci2 -49  ci  (1045  +  6864  c2  -  18628  c3  +  21176  c4  -  3328  c5  -  1144  c6) 

+49  (-46585+60984 c4-44148c5-572c6)+4  (26  (2205 c2  +  22825 c4-539 c5)  c5 
+  c3  (195186  -  26754  c2  -  412482  c4  +  33761  c5  +  21021  c6))) 


-2  (981120  ci2  +  384384  c22  +  21  (-103323  +  44800  c4  -  20020  c5) 

+  ci  (-1881600  c4  +  33  (9201  +  11648  c5))  -  199680  c6 

+  52  (3619  c32  +  42438  c42  +  11  c3  (-147  +  128  c4  -  273  c5)  +  6272  c4  c5 
+  4256  c52  +  3234  c4  c6  +  3003  c62)  +  224  c2  (7383  c4  -  4  (1232  +  247  c6))) 


w3,s  2  (940800  ci2  +  28028  c32  -  52  c3  (-30975  +  4410  c2  +  35794  c4  +  539  c5) 

+  3  ci  (730907  +  35672  c2  -  758184  c4  -  40768  c5  -  28028  c6)  +  7  (289487 
—  8  c4  (49071  +  34337  c5)  -  4004  c6  +  4 c5  (62249  -  12012  c2-  5824  c5  +  2002  c6))) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w3,9  —2  (251160  ci2  +  251160  c22  +  3097344  c4 

-  7  ci  (164109  +  149884  c3  -  46592  c4  -  31616  c5) 

+  77  (-28179  +  1092  c5  -  14336  c6)  +  1248  c2  (-1568  +  1875  c4  +  308  c6) 

+  4  (c3  (-257994  +  470400  c4  -  80353  c5) 

-  11  (3822  c42  +  c4  (1664  c5  -  28329  c6)  -  2002  (c5  -  c6)  (c5  +  c6)))) 

w3,i0  2  (2282665  -  2988216  c4  +  780744  c5 

+  ci  (2876349  -  229320  c2  +  201292  c3  -  2373800  c4  +  996856  c5) 

-  196  (143c32  +  c3  (-3377  +  1716  c2  +  5294  c4  -  832  c5  -  286  c6) 

+  3  C5  (182  c2  +  2806  c4  —  182  C5  —  143  eg))  +  28028  eg) 


w3.11 


w3,i2 


2  (2865423  +  1960623  ci  -  256256  c3  -  4526336  c4  +  442624  c5) 

2  (2026409  -  2747976  c4  +  1479624  c5 

+  ci  (-897603  +  229320  c2  +  201292  c3  +  1861288  c4  +  996856  c5) 

+  28  (-1001  c32  +  c3  (-62249  +  12012  c2  +  68674  c4  +  5824  c5  -  2002  c6) 
+  3  c5  (1274  c2  -  27078  c4  +  1274  c5  -  1001  c6))  -  28028  c6) 


w3, is  -2  (251160  ci2  -  251160  c22  +  2697984  c4 

-  7  ci  (164109  +  149884  c3  -  46592  c4  -  31616  c5) 

-  1248  c2  (-1568  +  1875  c4  +  308  c6)  +  77  (-28179  +  1092  c5  +  14336  c6) 
+  4  (c3  (-257994  +  470400  c4  -  80353  c5) 

+  11  (3822 c42  —  c4  (1664 c5  +  28329 eg) +  2002  (c52  +  c62)))) 


w3,i4 


33  (17  +  49  ci  —  64  c4) 


di 


1 

46126080 


w4,o 


462  (257  +  ci  -  256  c3) 


( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w4,9  14  (44583  +  4680  ci2  -  37752  c3  -  38400  c32  -  3900  c4 

+  3432  c3  c4  —  1716  C5  +  2756  c3  C5  —  2184  c4  C5  —  1144  C52 

—  312  c2  (— 128  +  143  c3  +  15  C5)  —  88  (-256  +  321  c3  +  78  c5)  c6 
+  ci  (-5973  -  26428  c3  +  1716  c4  -  3328  c5  +  1144  c6)) 


ty4,io  -14  (-47509  -  16836  c5  +  4  c3  (11869  +  5041  c3  +  9250  c5) 

+  ci  (-30673  +  50804  c3  +  20164  c5)) 


W4, 11 


14  (59103  -  38433  a  -  90880  c3  +  6656  c5) 


w4,i2  2  (278795  +  287060  c32  +  ci  (-343873  +  230100  c3  -  114004  c5) 

+  12  c5  (16711  +  3172  c5)  -  4  c3  (160391  +  59602  c5)) 


w4,i3  14  (44583  +  4680  ci2  +  3900  c4  -  24  c3  (1600  c3  +  143  (11  +  c4))  -  1716  c5 

+  52  (53  c3  +  42  c4)  c5  -  1144  c52  +  312  c2  (-128  +  143  c3  +  15  c5)  -  22528  c6 
+  264  (107  c3  +  26  c5)  c6  -  ci  (5973  +  26428  c3  +  1716  c4  +  3328  c5  +  1144  c6)) 


U>4,14  231  (1  +  Cl) 

( is  _ 1 _ 

322882560 

w5,o  -66  (-12561  +  12480  c2  +  49  c3) 


W5, 1 


-2  (88088  ci2  -  168168  c22  -  77  (28179  +  8  c4  (-1792  +  143  c4)) 

-  52  ci  (1408  c2  +  7  (-231  +  608  c3  -  883  c5)) 

+  7  c3  (164109  +  35880  c3  -  149884  c5)  +  1031976  c5 

-  4  c2  (81536  c3  +  3  (-258112  +  103873  c4  +  156800  c5  -  195000  c6)) 

-  34944  (56  +  11  c4)  c6  +  251160  c62) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w5, 2  2  (107016  Cl2  +  8  c2  (296725  c3  +  49  (-7623  +  2647  c5)) 

-  4  ci  (-195186  +  412482  c2  +  249214  c3  +  21021 c4  +  40768  c5  +  26754  c6) 

+  49  (11  (4235  +  52  c4  (-1  +  2  c5)  -  4  c5  (307  +  13  c5  -  156  c6)) 

+  c3  (-58701  +  4108  c5  +  4680 c6))) 

w5,3  -2  (133224  ci2  -  8  a  (-128997  +  235200  c2  +  133651  c3  -  27664  c5) 

+  21  (-103323  +  30679  c3  +  93184  c4  -  20020  c5)  +  199680  c6 

-  4  (350658  c22  -  4  c2  (250096  +  4576  c3  -  143429  c4  +  20384  c5) 

+  138138  c2  eg  +  91  (1207  c3  C5  —  187  C52  +  261  c4C6  —  366  cq2))) 

105.4  -2  (163072  ci2  -  3  c3  (-730907  +  313600  c3  -  28028  c4) 

-  8  c2  (-343497  +  284319  c3  +  232661 c5) 

-  7  (289487  +  4004  c4  +  52  c5  (-4425  +  77  c5))  +  15288  (7  c3  -  15  c5)  c6 
+  28  ci  (-62249  +  68674  c2  -  4368  c3  +  2002  c4  -  1001  c5  +  12012  c6)) 

105.5  -2  (88088  ci2  +  168168  c22  -  52  c4  (1408  c2  +  7  (-231  +  608  c3  -  883  c5)) 

+  7  c3  (164109  +  35880  c3  -  149884  c5) 

+  11  (-197253  +  56  c4  (-1792  +  143  c4)  +  93816  c5)  +  34944  (56  +  11  c4)  c6 
-  251160  c62  -  4  c2  (-674496  +  81536  c3  -  311619  c4  +  470400  c5  +  585000  c6)) 


ro5,6  2  (-163072  c42  +  3  c3  (-497947  +  313600  c3  +  28028  c4) 

+  8  c2  (-373527  +  206241 c3  -  296725  c5) 

+  49  (46585  -  572  c4  +  52  c5  (849  +  11  c5))  +  15288  (7  c3  -  15  c5)  c6 
+  196  ci  (-3377  +  5294  c2  +  624  c3  +  286  c4  +  143  c5  +  1716  c6)) 

to5,7  -2  (133224  ci2  -  8  a  (-128997  +  235200  c2  +  133651  c3  -  27664  c5) 

+  21  (-103323  +  30679  c3  -  93184  c4  -  20020  c5)  -  199680  c6 

+  4  (350658  c22  +  26  c2  (17248  +  704  c3  +  22066  c4  +  3136  c5  +  5313  c6) 

-  91  (1207  c3  c5  -  187  c52  -  261  c4  c6  +  366  c62))) 

{continues) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w5,8  2  (107016  ci2  -  8  c2  (343497  +  232661  c3  +  240359  c5) 

-  4  ci  (-369906  +  568638  c2  +  249214  c3  -  21021 c4  +  40768  c5  -  26754  c6) 
+  7  (11  (26317  +  364  c4  +  22636  c5) 

+  c3  (128229  +  28756  c5  -  32760  c6)  -  4004  c5  (2  c4  +  c5  +  12  c6))) 


-2  (221312  ci2  +  2206776  c22  +  3  c3  (-101211  +  327040  c3) 

+  364  ci  (896  c2  -  33  (35  +  32  c3  -  13  c5)) 

+  77  (-28179  +  52  c5  (21  +  47  c5)  -  14336  c6) 

+  8  c2  (117600  +  235200  c3  -  21021  c4  -  9152  c5  +  206724  c6) 
+  52  (3003  c42  +  7392  c62  +  32  c4  (120  +  133  c6))) 


ty5,io  2  (56056  ci2  -  539  (-4235  +  95  c3  +  52  c4)  +  780744  c5 

-  52  ci  (45650  c2  -  49  (849  +  64  c3  +  53  c5  -  90  c6))  -  196  (1170  c32  +  286  c3  c4 
+  4657  c3  C5  +  429  c4  C5  +  2  c2  (7623  +  2647  c3  +  4209  C5)  +  78  (22  c3  +  7  C5)  eg) ) 


u-5,11  2  (2865423  +  442624  ci  -  4526336  c2  -  1960623  c3  +  256256  c5) 


w5i  12  2  (2026409  +  56056  ci2  -  2456069  c3  +  28028  c4  +  1479624  c5 

+  52  ci  (35794  c2  +  7  (-4425  +  448  c3  +  371  c5  +  630  c6)) 

+  28  (c2  (-98142  +  68674  c3  -  81234  c5) 

+  7  (— 1170 c32  +  286c3c4  —  4657 C3C5  +  429c4cs  +  78  (22 c3  +  7 C5)  eg))) 


-2  (221312  ci2  -  2206776  c22  +  3  c3  (-101211  +  327040  c3) 

+  364  ci  (896  c2  -  33  (35  +  32  c3  -  13  c5)) 

+  8  c2  (606816  +  235200  c3  +  21021  c4  -  9152  c5  -  206724  c6) 
+  77  (-28179  +  52  c5  (21  +  47  c5)  +  14336  c6) 

-  52  (3003  c42  +  7392  c62  +  32  c4  (120  +  133  c6))) 


w5m 


-33  (—17  +  64  c2  +  49  c3) 


dg 


1 

322882560 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


W+0 


-3234  (-257 +  256  ci -c5) 


w6, !  2  (118404  Ci2  -  156  c2  (1335  +  686  c3  +  539  c5) 

+  196  ci  (858  c2  +  1807  c3  +  3  (-5071  +  2354  c4  +  3200  c5  -  3718  c6)) 

-  49  (3328  c32  -  88  c4  (-256  +  13  c5)  -  156  c3  (-55  +  44  c4  -  16  c5  -  30  c6) 
-  3  (14861  +  c5  (-11979  +  6400  c5)  +  13312  c6))) 


w6, 2  -14  (235704  c42  -  156  ci  (-2091  +  2011  c3  -  12  c5) 

+  11  (-28673  +  18939  c5)  -52  (c3  (-5943+  932  c3)  +  1664  c3c5  +  932  c52)) 


w6, 3  2  (1881600 ci2 +49  (88 c2  (-256  +  78c3  +  13c5)-3  (-14861  +  13312 c4+ 1991  c5) 

+  52  (—22  c32  +  90  c52  +  c3  (33  +  90c4  +  64c5)))  -  156  (1335  +  686  c3  +  539  c5)  c6 
+  12  ci  (115346  c2  -  949  c3  +  49  (-6710  +  3718  c4  +  1093  c5  +  286  c6))) 


w6, 4  -14  (-295955  +  4  Cl  (35893  +  66903  c4  -  75410  c3) 

+  217692  c3  +  324425  c5  -  4  (70603  a  +  35287  c3)  c5) 


We, e  2  (118404  c42  +  156  c2  (1335  +  686  c3  +  539  c5) 

-  196  ci  (858  c2  -  1807  c3  +  3  (5071  +  2354  c4  -  3200  c5  -  3718  c6)) 

-  49  (3328  c32  +  88  c4  (-256  +  13  c5)  +  156  c3  (55  +  44  c4  +  16  c5  -  30  c6) 
+  3  (-14861  +  (11979  -  6400  c5)  c5  +  13312  c6))) 


w6, e  14  (315403 +  160596  ci2 +  4  ci  (-130361  +  80558  c3  -  75829  c5) 

+  195263  c5  +  4  c3  (-25173  +  9516  c3  +  28501  c5)) 


we, 7  2  (1103872  c2  +  147  (14861  +  572  c3  +  13312  c4  -  1991  c5) 

+  208260  c6  +  4  (470400  d2 

—  637  (22  c32  +  22  c2  (6  c3  +  C5)  +  2  c3  (45  c4  —  32  C5  —  21  ce)  —  3  C5  (30  C5  + 11  cej) 

-  3  ci  (115346  c2  +  949  c3  +  49  (6710  +  3718  c4  -  1093  c5  +  286  c6)))) 

(1 continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w6,8  -14  (-230100  c3  -  11  (26905  +  14061  c5) 

+  4  (81234 ci2 +  3  ci  (14573  +  21593  c3  +  32122  c5)  +  5824  (c32  +  c3  c5  -  c52))) 

w6, 9  -2  (298116  ci2  -  1617  (1351  +  648  c3)  +  208260  c4 

+  15288  (c2  (-128  +  15  c3)  +  7  c3  (c3  +  c4)) 

+  4  ci  (49  (12639  +  11154  c2  +  8768  c3  -  858  c4)  -  86931  c5) 

+  49  (18056  c3  +  33  (493  +  52  c4))  c5)  -  8624  (-256  +  321  ci  +  78  c3  +  13  c5)  c6 

we, io  -14  (-315403  +  351780  ci2  +  86528  c32  +  4  c3  (-23639  +  21632  c5) 

+  c5  (13081  +  162468  c5)  +  4  ci  (52265  c3  +  29463  (1  +  2  c5))) 

we, a  -2  (4599552  ci  +  49  (-59103  +  6656  c3  +  38433  c5)) 

we, 12  14  (295955  +  259116  d2  +  23296  c32  +  4  ci  (-155667  +  72727  c3  -  81234  c5) 

+  (123367  -  117852  c5)  c5  -  4  c3  (62249  +  5824  c5)) 

w6,i3  2  (-298116  ci2  +  15288  c2  (-128  +  15  c3) 

+  208260  c4  -  539  (-4053  +  1479  c5  +  2048  c6) 

+  4  ci  (-619311  +  546546  c2  -  429632  c3  -  42042  c4  +  86931 c5  +  346038  c6) 

+  196  (-546  c32  +  143  c5  (3  c4  +  2  c6)  +  2  c3  (2673  +  273  c4  -  2257  c5  +  858  c6))) 

we, i4  1617  (l  +  c5) 


10090080 

wy,o  25806 

107,1  2  (6006  ci  -  6240  c2  -  11  (-4095  +  2730  c3  +  3136  c4  -  234  c5)  +  61152  c6) 

w7,2  -16692  ci  -  98  (-1001  +  1326  c3  +  154  c5) 

(1 continues ) 
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dj  >  Wj  k 
U>7,3 

W7,4 

W  7,5 

U>7,6 

U>7,7 

W  7,8 

W  7,9 

W7S0 

W7,U 

W7,12 

W7,13 

W7.14 

ds 

w8,o 


Table  C.7:  Integral  approximation  Ij ,  n  =  14.  ( continued ) 

Expression 

2  (2574  ci  -  34496  c2  -  39  (7  (22  c3  +  224  c4  -  55  (3  +  2  c5))  +  160  c6)) 

135212  ci  -  26  (-3157  +  1038  c3  +  4074  c5) 

2  (6006  ci  +  6240  c2  -  30030  c3  +  11  (4095  +  3136  c4  +  234  c5)  -  61152  c6) 

-15092  ci  +  26  (3773  +  642  c3  +  4998  c5) 

2  (2574  ci  +  34496  c2  +  39  (1155  -  154  c3  +  1568  c4  +  770  c5  +  160  c6)) 

26  (3157  +  1038  ci  +  4074  c3)  +  135212  c5 
78  (1155  +  770  ci  +  1568  c2  -  66  c3  -  160  c4  +  154  c5)  +  68992  c6 
129948  ci  +  7546  (13  +  2  c3)  -  16692  c5 

12870 

82082  -  105924  Cl  -  135212  c3  +  26988  c5 

78  (1155  +  770  ci  -  1568  c2  -  66  c3  +  160  c4  +  154  c5)  -  68992  c6 

-33 

1 

46126080 

462  (257  +  256ci  +  c5) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


tw8,i  -14  (572  ci2  +  11  (-4053  +  780  c3  +  2048  c4  +  3267  c5) 

+  4  (-39  c2  (-25  +  14  c3  +  11  c5) 

+  2  (416  c32  +  (143  c4  -  2400  c5)  c5  +  39  c3  (22  c4  +  8  c5  -  15  c6))) 

+  12  ci  (-4785  +  286  c2  +  507  c3  +  2354  c4  +  3200  c5  -  3718  c6)  -  39936  c6) 


w8, 2  14  (47509  -  44148  c3  -  26983  c5 

+  4  (8418  ci2  +  ci  (19455  -  11869  c3  -  9250  c5)  -  832  (c32  +  c3  c5  -  c52))) 


w8,3  -14  (38400  ci2  +  88  c2  (256  +  78  c3  +  13  c5) 

+  4  ci  (7062  c2  -  689  c3  +  11154  c4  -  6607  c5  +  858  (-11  +  c6)) 

+  3  (-14861  +  13312  c4  +  1991  c5  +  1300  c6) 

+  52  (22  c32  +  c3  (—33  +  90  c4  —  64  C5  —  42  eg)  —  3  C5  (30  C5  +  11  eg)) ) 


w8,4  2  (278795  +  287060  ci2  -  343873  c5  +  4  c3  (-50133  +  9516  c3  +  28501  c5) 

-  4  ci  (-160391  +  59602  c3  +  57525  c5)) 


w8, 5  -14  (572  ci2  +  11  (-4053  +  780  c3  -  2048  c4  +  3267  c5) 

+  4  (39  c2  (-25  +  14c3  +  11c5) 

+  2  (416  c32  -  c5  (143  c4  +  2400  c5)  -  39  c3  (22  c4  -  8  c5  -  15  c6))) 

-  12  ci  (4785  +  286  c2  -  507  c3  +  2354  c4  -  3200  c5  -  3718  c6)  +  39936  c6) 


w8,6  -14  (-47509  +  20164  Ci2  +  c3  (16836  -  20164  c5) 

+  4  ci  (-11869  +  9250  c3  -  12701  c5)  -  30673  c5) 


w8>7  -14  (38400  ci2  -  88  c2  (256  +  78  c3  +  13  c5) 

-  3  (14861  +  13312  c4  -  1991  c5  +  1300  c6) 

-  4  ci  (7062  c2  +  689  c3  +  11154  c4  +  6607  c5  +  858  (11  +  c6)) 

4“  52  (22  c32  —  c3  (33  4“  90  c4  -t-  64  C5  —  42  c8)  -t-  3  C5  ( — 30  C5  -t- 11  c8)) ) 


w8j8  2  (278795  +  230100  c3  +  135223  c5  +  4  (81234  d2 

+  ci  (148275  +  60125  c3  + 31148  c5)  +  52  (233  c32  +  416  c3  c5  +  233  c52))) 

(1 continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w8, 9  14  (44583  +  7228  ci2  +  21384  c3  -  2184  c32  +  312  c2  (128  +  15  c3)  -  3900  c4 

+  2184  c3  c4  —  16269  C5  —  18056  c3  C5  +  1716  c4  C5  +  88  (256  +  78  c3  +  13  C5)  cq 
+  4  ci  (16929  +  11154  c2  +  10432  c3  -  858  c4  +  1027  c5  +  7062  c6)) 


w8>  10  14  (47509  +  47476  c42  +  3328  c32  +  c3  (13508  -  3328  c5) 

+  (3361  -  16836  c5)  c5  +  4  Cl  (26283  +  5873  c3  +  8418  c5)) 


u+,11 


14  (59103  +  90880  a  -  6656  c3  -  38433  c5) 


w8, V2  -2  (-278795  +  278564  Ci2  +  86528  c32  +  4  c3  (62249  +  21632  c5) 

+  c5  (-86759  +  162468  c5)  +  4  Cl  (83881  c3  -  40617  (1  +  2  c5))) 


w8A3  14  (44583  +  7228  c42  +  21384  c3  +  3900  c4  -  16269  c5  -  22528  c6 

-  4  ci  (-16929  +  11154  c2  -  10432  c3  -  858  c4  -  1027  c5  +  7062  c6)  -  4  (546  c32 
+  78  c2  (128  +  15  c3)  +  546  c3  c4  +  4514  c3  C5  +  429  c4  C5  +  286  (6  c3  +  C5)  c3)) 


wsm 


231  (l  +  c5) 


dg 


1 

322882560 


W9,0 


66  (12561  +  12480  c2- 49  c3) 


wg,  1  -2  (88088  ci2  +  168168  c22  +  7  c3  (164109  +  35880  c3  -  149884  c5) 

+  11  (-197253  +  56  c4  (1792  +  143  c4)  +  93816  c5) 

+  52  ci  (1408  c2  +  7  (231  -  608  c3  +  883  c5)) 

+  4  c2  (81536  c3  +  3  (-224832  +  103873  c4  +  156800  c5  -  195000  c6)) 
+  34944  (-56  +  11  c4)  c6  -  251160  c62) 


( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


W9,2  2  (107016  ci2  -  8  c2  (296725  c3  +  49  (-7623  +  2647  c5)) 

+  4  ci  (195186  +  412482  c2  -  249214  c3  +  21021  c4  -  40768  c5  +  26754  c6) 
+  49  (11  (4235  +  52  c4  -  1228  c5)  -  572  c5  (2  c4  +  c5  +  12  c6) 

+  c3  (4108  c5  -  3  (19567  +  1560  c6)))) 


w9j3  -2  (133224  ci2  +  21  (-103323  +  30679  c3  +  93184  c4  -  20020  c5) 

+  8  ci  (128997  +  235200  c2  -  133651  c3  +  27664  c5)  +  199680  c6 

+  4  (350658  c22  -  26  c2  (17248  +  704  c3  -  22066  c4  +  3136  c5  -  5313  c6) 
-  91  (1207  c3  c5  -  187  c52  -  261  c4  c6  +  366  c62))) 

w9A  -2  (-2026409  +  163072  d2  +  2192721  c3  +  28028  c4  +  1610700  c5 

-  28  ci  (62249  +  68674  c2  +  4368  c3  +  2002  c4  +  1001  c5  +  12012  c6) 

+  4  (2  c2  (-343497  +  284319  c3  +  232661  c5) 

-49  (4800c32  +  429c3c4  +  143c52  +  78  (7c3-15c5)  c6))) 


w9, s  -2  (88088  ci2  -  168168  c22  -  77  (28179  +  8  c4  (1792  +  143  c4)) 

+  7  c3  (164109  +  35880  c3  -  149884  c5)  +  1031976  c5 
+  52  ci  (1408  c2  +  7  (231  -  608  c3  +  883  c5))  -  34944  (-56  +  11  c4)  c6 
+  251160  c62  +  4  c2  (-774336  +  81536  c3  -  311619  c4  +  470400  c5  +  585000  c6)) 

w9.6  -2  (163072  ci2  -  3  c3  (-497947  +  313600  c3  -  28028  c4) 

+  8  c2  (-373527  +  206241 c3  -  296725  c5) 

-  49  (46585  +  572  c4  +  52  c5  (849  +  11  c5))  +  15288  (7  c3  -  15  c5)  c6 
+  196  ci  (3377  +  5294  c2  -  624  c3  +  286  c4  -  143  c5  +  1716  c6)) 

w9,7  2  (-133224  ci2  -  8  ci  (128997  +  235200  c2  -  133651  c3  +  27664  c5) 

+  3  (723261  -  214753  c3  +  652288  c4  +  140140  c5  +  66560  c6) 

+  4  (350658  c22  +  c2  (18304  c3  +  573716  c4  +  3136  (319  +  26  c5)  +  138138  c6) 

+  91  (1207  c3  c5  -  187  c52  +  261  c4  c6  -  366  c62))) 


( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


w9j8  2  (107016  ci2  +  8  c2  (343497  +  232661  c3  +  240359  c5) 

+  4  ci  (369906  +  568638  c2  -  249214  c3  -  21021  c4  -  40768  c5  -  26754  c6) 
+  7  (c3  (128229  +  28756  c5  +  32760  c6) 

+  11  (26317  4~  22636  C5  364  ( — c4  -t-  2  c4  C5  —  C5  4- 12  C5  cq) ) ) ) 


-2  (221312  ci2  -  2206776  c22  +  3  c3  (-101211  +  327040  c3) 

-  364  ci  (896  c2  +  33  (35  +  32  c3  -  13  c5)) 

+  77  (-28179  +  52  c5  (21  +  47  c5)  -  14336  c6) 

-  8  c2  (606816  +  235200  c3  -  21021  c4  -  9152  c5  +  206724  c6) 
-  52  (3003  c42  +  7392  c62  +  32  c4  (-120  +  133  c6))) 


w9,io  2  (56056  ci2  -  539  (-4235  +  95  c3  -  52  c4)  4-  780744  c5 

4-196  (— 1170 c324- 286 c3c4  —  4657 c3C5  +  429c4cs  +  2c2  (76234-2647 c3+4209cs) 
+  78  (22  c3  +  7  c5)  c6)  +  52  ci  (45650  c2  +  49  (849  +  64  c3  +  53  c5  +  90  c6))) 


w9t  11  2  (2865423  4-  442624  ci  +  4526336  c2  -  1960623  c3  +  256256  c5) 


u>9, 12  2  (56056  Cl2  -  77  (-26317  4-  31897  c3  +  364  c4)  +  1479624  c5 

-  52  ci  (35794  c2  +  7  (4425  -  448  c3  -  371  c5  4-  630  c6)) 

-28  (c2  (-98142  +  68674  c3  -  81234  c5) 

+  7  (1170  c32  +  286  c3  c4  +  4657 c3 C5  +  429 c4 C5  +  78  (22  c3  +  7 C5)  c3)) ) 


-2  (221312  ci2  +  2206776  c22  +  3  c3  (-101211  +  327040  c3) 

-  364  ci  (896  c2  +  33  (35  +  32  c3  -  13  c5)) 

-  8  c2  (117600  +  235200  c3  +  21021  c4  -  9152  c5  -  206724  c6) 

+  77  (-28179  +  52  c5  (21  +  47  c5)  +  14336  c6) 

+  52  (3003  c42  +  7392  c62  +  32  c4  (-120  +  133c6))) 


w9,i4 


33  (17  +  64  c2  -  49  c3) 


dio 


1 

322882560 

{continues) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


u>io,o  3234  (257  +  ci  +  256  c3) 

1010,1  —2  (156  c2  (1335  +  1078  c3  -  686  c5) 

+  ci  (84084  c2  +  347724  c3  -  49  (-16269+  1144  c4  +  18056  c5)) 

+  49  (-44583  +  22528  c4  +  21384  c5  -  39936  c6 

+  4  (1521  c32  +  78 C5  (22c4  +  7c5-15c6)  +  c3  (7062 c4  +  8768 c5  -  33  (383  +  338 c6))))) 

w10,2  -14  (-315403  +  162468  a2  +  351780  c32  +  a  (13081  -  235704  c3  -  86528  c5) 

+  4  c5  (23639  +  21632  c5)  +  4  c3  (-29463  +  52265  c5)) 

w io,3  2  (940800  ci2  +  147  (14861  +  20284  c3  -  13312  c4  +  2860  c5) 

-  208260  c6  +  49  a  (1144  c2  -  3  (11979  +  12800  c3  -  832  c5  +  572  c6)) 

-  4  (1078  c2  (256  +  321  c3  +  78  c5) 

-  13  (2277  c32  —  98  c5  (45  c4  +  32  c5  —  21  eg)  —  49  c3  (858  c4  -  139  c5  +  66  c6)))) 

w10,4  14  (295955  +  23296  c42  -  324936  c32  -  52  c5  (4425  +  448  c5) 

-  156  c3  (-1121  +  1661  c5)  +  ci  (154671  +  385464  c3  +  23296  c5)) 

ww,5  2  (a  (84084  c2  -  347724  c3  -  49  (16269  +  1144  c4  -  18056  c5)) 

+  156  c2  (1335  +  1078  c3  -  686  c5)  +  49  (44583  +  22528  c4  -  21384  c5  -  39936  c6 
-4  (1521c32  +  78c5  (-22 c4  +  7 c5  +  15 c6)  +  c3  (-12639  -  7062 c4  +  8768 c5  + 11154 c6)))) 

w ioi6  14  (315403  +  48464  Ci2  -  235704  c32  +  a  (-208329  +  1872  c3  -  86528  c5) 

+  52  c5  (5943  +  932  c5)  +  156  c3  (2091  +  2011  c5)) 

w  10,7  2  (940800  ci2  +  4312  c2  (256  +  321  c3  +  78  c5)  +  147  (14861  +  13312  c4  +  2860  c5) 

—  49  ci  (35937  + 1144  c2  +  38400  c3  —  2496  C5  — 1716  c3)  +  208260  c6  +  4  (29601  c32 

-  1274 c5  (-45  c4  +  32  c5  +  21  c6)  +  49  c3  (15213  +  11154 c4  +  1807 c5  +  858  c6))) 

w  10,8  -14  (-295955  -  123367  ci  +  117852  d2  -  622668  c3  -  324936  ci  c3 

-  259116  c32  -4  (62249 +  5824  ci  +  72727  c3)  c5  -  23296  c52) 

(1 continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


ww,g  2  (2184567  +  229320  a2  +  3945480  c3  +  1881600  c32  -  20  8  2  60  c4 

—  168168  c3  c4  —  84084  C5  —  11388  c3  C5  +  107016  c4  C5  —  56056  C52 

+  15288  c2  (128  +  143  c3  +  15  c5)  +  4312  (256  +  321  c3  +  78  c5)  c6 
-  49  ci  (5973  +  13116  c3  +  1716  c4  +  3328  c5  +  1144  c6)) 


wio,io  14  (315403  +  160596  c32  +  d  (195263  +  303316  c3  -  114004  c5) 

+  12  c5  (8391  +  3172  c5)  +  4  c3  (130361  +  80558  c5)) 


4+0,11 


5792094  -  3766434  Cl  +  9199104  c3  +  652288  c5 


w  10,12  -14  (-295955  +  4  c3  (-35893  +  66903  c3  -  75410  c5) 

-  217692  c5  +  ci  (324425  +  282412  c3  +  141148  c5)) 

4+0,13  2  (229320  ci2  +  3945480  c3  +  208260  c4 

-  49  ci  (5973  +  13116  c3  -  1716  c4  +  3328  c5  -  1144  c6) 

-539  (—4053+156 cs+2048 c6)  — 4  (-470400 c32  +  38  22  c2  (128  +  143  c3+15 c5) 

+  c3  (-42042 c4  +  2847 c5  +  346038 c6)  +  1274 c5  (21c4  +  ll  (c5  +  6c6)))) 


4+0,14 


1617  (1  +  ci) 


du 


1 

322882560 


4+1,0 


66  (12561  +  49  ci  +  12480  c4) 


wn.i  2  (133224  c22  +  ci  (644259  +  439348  c3  -  73216  c4  -  1069208  c5) 

-  11  (7  (-28179  +  52  c3  (105  +  17  c3)  -  23296  c4)  +  93816  c5) 

-  56  (25047  c42  +  208  c3  (28  c4  -  19  c5)  +  33600  c4  c5  +  2379  c52) 

-  156  c2  (1280  +  3542  c4  -  609  c6)  +  1956864  c6  +  2294864  c4  c6) 

(1 continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


wiij2  2  (940800  ci2  +  28028  c32  -  52  c3  (41601  +  4410  c2  +  45650  c4  +  539  c5) 

+  3  ci  (497947  +  35672  c2  +  549976  c4  -  40768  c5  -  28028  c6) 

-49  (8  c4  (-7623+  2647  c5) 

+  4  c5  (3377  +  1716  c2  +  832  c5  -  286  c6)  +  11  (-4235  +  52  c6))) 


u>nj3  -2  (981120  ci2  +  384384  c22  -  21  (103323  +  44800  c4  +  20020  c5) 

+  3  ci  (101211  +  627200  c4  +  128128  c5)  +  224  c2  (4928  +  7383  c4  -  988  c6) 
+  199680  c6  +  52  (3619  c32  +  42438  c42  -  6272  c4  c5  +  4256  c52 
-  11  c3  (147  +  128  c4  +  273  c5)  +  3234  c4  c6  +  3003  c62)) 


iyn,4  -2  (229320  ci2  +  88  (-31227  c4  + 21151  c4c5  -  637  c52) 

-  7  ci  (350867  +  48048  c2  -  130396  c3  +  274696  c4  -  23296  c5  -  8008  c6) 

+  4  c3  (369906  -  26754  c2  +  568638  c4  +  33761  c5  +  21021  c6) 

+  7  (780  (295  +  42  c2)  c5  -  11  (26317  +  364 c6))) 

wn,5  2  (-133224  c22  +  Ci  (644259  +  439348  c3  -  73216  c4  -  1069208  c5) 

-  11  (7  (-28179  +  52  c3  (105  +  17  c3)  -  51968  c4)  +  93816  c5) 

-  56  (-25047  c42  +  208  c3  (28  c4  -  19  c5)  +  33600  c4  c5  +  2379  c52) 

+  156  c2  (1280  +  3542  c4  -  609  c6)  -  1956864  c6  -  2294864  c4  c6) 


wllfi  -2  (229320  Ci2  +  780744  c3  +  4  (3822  c2  (7  c3  -  15  c5) 

—  286  C5  (2075  c4  +  49  C5)  +  49  c3  (8418  c4  +  689  C5  —  429  C6)) 

+  49  ci  (-1045  +  6864  c2  +  18628  c3  +  21176  c4  +  3328  c5  -  1144  c6) 
-  49  (46585  +  60984  c4  +  44148  c5  -  572  c6)) 


wlh7  2  (-981120  Ci2  -  4004  c3  (-21  +  47  c3)  +  21  (103323  +  231168  c4  +  20020  c5) 

-  3  ci  (101211  +  627200  c4  +  128128  c5)  +  199680  c6 
+  4  (96096  c22  +  56  c2  (4928  +  7383  c4  -  988  c6) 

+  13  (1408  c3  c4  +  42438  c42  +  3003  c3  c5  +  6272  c4  c5  -  4256  c52  +  3234  c4  c6  +  3003  c62))) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


tyii.s  2  (940800  ci2  +  4  (7007  c32  +  13  c3  (30975  +  4410  c2  +  35794  c4  -  539  c5) 
+  14  c5  (6006  c2  +  34337  c4  -  2912  c5  -  1001  c6)) 

-  3  ci  (-730907  +  35672  c2  -  758184  c4  +  40768  c5  -  28028  c6) 
+  77  (26317  +  35688  c4  +  22636  c5  +  364 c6)) 


ton, 9  2  (-251160  ci2  +  2184  c2  (896  +  115  c2)  +  1031976  c3 

+  2697984  c4  +  7  cx  (164109  +  149884  c3  +  46592  c4  -  31616  c5) 

-  77  (-28179  +  1092  c5  -  14336  c6) 

+  4  (7  c3  (67200  c4  +  11479  c5)  +  312  c2  (1875  c4  +  308  c6) 

-  11  (3822  c42  +  c4  (1664  c5  -  28329  c6)  +  2002  (c52  +  c62)))) 


tollilo  2  (2282665  +  2988216  c4  +  780744  c5 

+  ci  (2876349  +  229320  c2  +  201292  c3  +  2373800  c4  +  996856  c5) 

+  196  (-143  c32  +  c3  (3377  +  1716  c2  +  5294  c4  +  832  c5  -  286  c6) 
+  3  C5  (182  c2  +  2806  c4  +  182  C5  —  143  eg))  —  28028  eg) 


tyii,n  2  (2865423  +  1960623  ci  -  256256  c3  +  4526336  c4  +  442624  c5) 


u-ii.12  -2  (-2026409  -  2747976  c4 

+  ci  (897603  +  229320  c2  -  201292  c3  +  1861288  c4  -  996856  c5)  -  1479624  c5 
-  28028  c6  +  28  (1001  c32  +  c3  (62249  +  12012  c2  +  68674  c4  -  5824  c5  -  2002  c6) 
-  3  c5  (-1274  c2  +  27078  c4  +  1274  c5  +  1001  c6))) 


wii,^  -2  (251160  ci2  +  251160  c22  -  3097344  c4 

-  7  ci  (164109  +  149884  c3  +  46592  c4  -  31616  c5) 

+  1248  c2  (1568  +  1875  c4  +  308  c6)  +  77  (-28179  +  1092  c5  +  14336  c6) 

-  4  (c3  (257994  +  470400  c4  +  80353  c5) 

+  11  (3822  c42  -  2002  (c5  -  c6)  (c5  +  c6)  -  c4  (1664  c5  +  28329  c6)))) 


Wll.14 


33  (17  +  49  ci  +  64  c4) 


di2 


1 

46126080 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


Wl2,0 


-462  (-257  +  C3  -  256c5) 


iyi2, i  -14  (1144  ci2  -  11  (4053  +  543  c3  -  2048  c4  +  3432  c5) 

+  4  (-1170  c32  +  39  c2  (25  +  11  c3  +  22  c5)  +  c3  (-286  c4  +  6607  c5) 
+  6  c5  (1177  c4  +  1600  c5  -  1859  c6))  -  39936  c6 

52  c4  (33  +  42  c2  —  64  c3  —  132  c4  -I-  53  C5  90  c3)) 


1012,2  14  (47509  +  16836 ci  — 30673 c3  + 20164 ci c3  +  4  (11869  +  9250ci-12701c3)  c5-20164c52) 


ioi2i3  -14  (22528  c2  -  3  (14861  +  5423  c3  -  13312  c4  +  22572  c5  -  1300  c6) 

+  4  (546  ci2  -  22  c2  (13  c3  -  321  c5)  +  13  (79  c3  +  858  c4  -  139  c5)  c5 
+  429  (c3  +  2  c5)  c6  +  2  ci  (2673  -  858  c2  +  2257  c3  -  585  c4  +  5216  c5  +  273  c6))) 


io12j4  -2  (-278795  +  86528  ci2  +  86759  c3  +  162468  c32 

+  4  ci  (-62249  +  21632  c3  -  83881  c5)  +  162468  (-1  +  2  c3)  c5  +  278564  c52) 


1012,5  -14  (1144  ci2  -  11  (4053  +  543  c3  +  2048  c4  +  3432  c5) 

+  39936  C6  —  52  ci  (—33  +  42  c2  +  64  c3  —  132  c4  —  53  C5  +  90  ce ) 

-  4  (1170  c32  +  39  c2  (25  +  11  c3  +  22  c5) 

—  c3  (286  c4  +  6607  c5)  -  6  c5  (-1177  c4+  1600  c5  +  1859  c6))) 


ioi2,6  14  (47509  +  3328  ci2  -  16836  c32  -  4  ci  (3377  +  832  c3  +  5873  c5) 

+  4  c5  (26283  +  11869  c5)  -  c3  (3361  +  33672  c5)) 


1012,7  -14  (2184  ci2  +  8  ci  (2673  +  858  c2  +  2257  c3  +  585  c4  +  5216  c5  -  273  c6) 

-  3  (14861  +  5423  c3  +  13312  c4  +  22572  c5  +  1300  c6) 

+  4  (22  c2  (-256  +  13  c3  -  321  c5) 

+  13  (79  c3  —  858  c4  —  139  C5)  C5  —  429  (c3  +  2  C5)  ce)) 


1012,8  2  (278795  +  38064  ci2  +  4  c5  (160391  +  71765  c5) 

+  c3  (343873  +  230100  c5)  +  4  Ci  (28501  c3  +  17  (2949  +  3506  c5))) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


wi2,g  -14  (-3  (14861  +  13312  c2  +  11979  c3  -  1300  c4  +  19140  c5)  -  22528  c6 
+  4  (832  ci2  —  4800  c32  +  143  C5  (—78  c2  +  6  c4  +  C5)  —  7062  C5  c§ 

+  39 Ci  (— 55  +  30c2  +  16c3  +  14c4  — 39c5  +  44c6)  +  c3  (429 c4  —  9600 C5  +  286 cq))) 


wv. 2,10  -14  (-47509  -  26983  c3  -  77820  c5 

+  4  (832  ci2  +  13  ci  (-849  +  64  c3  -  913  c5)  -  2  (c3  +  c5)  (416  c3  +  4209  c5)) ) 


wi2,n 


14  (59103  +  6656  ci  +  38433  c3  +  90880  c5) 


rc12ji2  2  (278795  +  48464  ci2  +  48464  c32  +  36  c5  (16475  +  9026  c5) 

-  c3  (135223  +  124592  c5)  +  52  ci  (1664  c3  -  25  (177  +  185  c5))) 


wi2,i3  -14  (39936  c2  -  3  (14861  +  11979  c3  +  1300  c4  +  19140  c5)  +  22528  c6 
+  4  (832  ci2  —  4800  c32  +  143  C5  (78  c2  —  6  c4  +  C5)  +  7062  C5  cq 
—  39  Ci  (55  +  30  c2  —  16  c3  +  14  c4  +  39  C5  +  44  cq)  —  c3  (429  c4  +  9600  C5  +  286  c3)) ) 

ici2ji4  —231  (—1  +  c3) 


di3 


1 

322882560 


Wi3j0 


66  (12561  + 49  c5  +  12480  c6) 


u+3,i  -2  (-156156  c22  +  1664  c2  (120  +  133  c4) 

+  11  (7  (-28179  +  5460  c3  +  128  (112  -  39  c4)  c4)  +  27603  c5) 

-  4854528  c6  +  4  (47047  ci2  +  224  (247  c32  -  429  c3  c5  +  1095  c52) 

-  143  ci  (-147  +  273  c3  -  128  c6) 

+  14  (3003  c2  +  5824  c3  +  29532  c4  +  33600  c5)  c6  -  551694  c62)) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


wi3,2  2  (-28028  c2  (-1  +  2  c5)  +  49  (55  (847  +  19  c5) 

+  52  (c3  (-849  +  22  c3  +  90  c4)  +  4  (16  c3  +  33  c4)  c5  -  90  c52)) 

-  8  (-373527  +  296725  c3  +  129703  c5)  c6 

+  4  ci  (195186  +  21021  c2  -  33761  c3  -  26754  c4  +  228193  c5  +  412482  c6)) 

wi3,3  2  (-88088  c22  +  21  (103323  +  104  c4  (-896  +  115  c4)  +  54703  c5) 

+  4  ci  (-257994  +  80353  c3  -  262297  c5  -  470400  c6) 

+  308  c2  (-3584  +  1248  c4  -  4047  c6)  +  2697984  c6 

-  52  (7  (11  c3  (-21  +  22  c3)  -  608  c3  c5  +  690  c52) 

-8  (176  c3  -  5625  c4  +  784 c5)  c6  +  3234c62)) 

u>i3j4  -2  (-2026409  + 28028  ci2  + 1479624  c3- 2548  (11  c2  (-l  +  3c3)  +  42c3  (c3-c4)) 

+  897603  c5  + 392  (2543  c3  -  585  c4)  c5  -  2747976  c6  +  8  (284319  c3  + 232661  c5)  c6 
-  28  ci  (62249  +  2002  c2  +  5824  c3  -  12012  c4  -  7189  c5  +  68674  c6)) 

w13,5  -2  (188188  ci2  +  156156  c22  + 11  (-197  2  53  +  896  c4  (-112  +  39  c4)  +  27603  c5) 

-572  ci  (-147  +  273  c3- 128  c6)-  940800  c6- 104  c2  (1920  + 2128  c4+ 1617  c6) 

+  4  (55328  c32  +  245280  c52  -  3003  c3  (-35  +  32  c5) 

+  56  (1456  c3  -  7383  c4  + 8400  c5)  c6  +  551694  c62)) 

w13, 6  -2  (-28028  c2  +  780744  c3  +  196  (143  ci2  +  429  c2  c3  -  546  c3  (c3  +  c4) 

+  2  (2543  c3  +  585  c4)  c5  +  ci  (3377  +  286  c2  -  832  c3  -  1716  c4  +  1027  c5)) 

+  8  (129703  ci  +  206241  c3  -  296725  c5)  c6  -  49  (58701  c5  +  847  (55  +  72  c6))) 

wr. 3,7  2  (88088  c22  +  4  d  (-257994  +  80353  c3  -  262297  c5  -  470400  c6) 

-  308  c2  (-3584  +  1248  c4  -  4047  c6) 

+  3  (723261  +  728  (896  -  115  c4)  c4  +  382921  c5  +  1032448  c6) 

+  52  (-7  (11  c3  (-21  +  22  c3)  -  608  c3  c5  +  690  c52) 

+  8  (176  c3  +  5625  c4  +  784  c5)  c6  +  3234  c62) ) 

( continues ) 
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Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 


dj  >  Wj  /,- 


Expression 


wi3,s  2  (7  (-4004  c2  +  230100  c3  +  11  (26317  +  31897  c5  +  35688  c6)) 

+  4  (1274  (11  c32  +  (11  (ca  -  6  c4)  -  45  c5)  c5  +  c3  (-45  c4  +  32  c5)) 

+  2  (232661  c3  +  240359  c5)  c6 

+  ci  (369906  -  21021  c2  -  33761  c3  +  26754  c4  +  228193  c5  +  568638  c6)) ) 


ty13)9  -2  (68068  d2  +  312  c4  (640  +  427  c4)  -  364  Cl  (1155  +  608  c3  -  1207  c5  +  896  c6) 

-  77  (28179  +  8367  c5  +  51968  c6)  +  52  c2  (1827  c4  -  4  (9408  +  11033  c6)) 

+  8  (16653  c32  +  11  (6279  c4  +  832  c5  -  15939  c6)  c6 
—  c3  (128997+  133651  c5  +  235200  c6))) 

ty13)10  2  (28028  ci2  +  1493841  c5  +  28028  c2  (1  +  2  c3  +  3  c5)  +  41503  (55  +  72  c6) 

+  52  ci  (-49  (-849  +  11  c3  +  90  c4)  +  45650  c6)  -  196  (832  c32 

+  c3  (-3377  +  1716  c4  -  624  c5  -  5294  c6)  -  6  c5  (-91  c4  +  800  c5  +  1403  c6)) ) 

u+3,11  2  (2865423  +  256256  ci  -  442624  c3  +  1960623  c5  +  4526336  c6) 

wi3,i2  2  (2026409  +  28028  d2  +  2192721  c5  -  28028  c2  (1  +  2  c3  +  3  c5) 

+  2747976  c6  -  52  ci  (30975  +  539  c3  -  4410  c4  +  35794  c6)  -  28  (5824  c32 
—  6  c5  (637  c4  + 5600 c5  + 13539 c6)  +  c3  (62249  -  12012  c4-  4368  c5  +  68674 c6))) 

^13,13  2  (-68068  ci2  +  1031976  c3  +  1092  c2  (-1792  +  87  c4) 

+  312  c4  (640  +  427  c4)  +  364  ci  (1155  +  608  c3  -  1207  c5  +  896  c6) 

+  77  (28179  +  8367  c5  +  23296  c6)  + 8  (-16653  c32 
-  11  c6  (26078  c2  -  6279  c4  +  832  c5  +  15939  c6)  +  7  c3  (19093  c5  +  33600  c6)) ) 


W  13,14 


33  (17  +  49  c5  +  64  c6) 


di4 


1 

315315 


W  u,0 


1617 


( continues ) 
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dj  >  Wj  k 


W  14,1 


w  14,2 


Wli,  3 


W  14,4 


U>14,5 


Wl4,6 


W  14,7 


Wl4,8 


U>14,9 


W14.10 


Wi4.ll 


W14.12 


W14.13 


W14.14 


Table  C.7:  Integral  approximation  Ij,  n  =  14.  ( continued ) 

Expression 

-286  ci  -  780  c2  -  49  (-231  +  26  c3  +  88  c4  +  150  c5  -  156  c6) 
28  (418  +  225  ci  -  299  c3  -  106  c5) 

11319  -  7350  ci  -  4312  c2  +  286  c3  -  7644  c4  +  1274  c5  -  780  c6 

7  (1529  +  918  ci  -  1290  c3  -  910  c5) 

-286  ci  +  780  c2  -  49  (-231  +  26  c3  -  88  c4  +  150  c5  +  156  c6) 
-28  (-418  +  106  ci  +  225  c3  -  299  c5) 

-7350  ci  +  4312  c2  +  286  c3  +  49  (231  +  156  c4  +  26  c5)  +  780  c6 
7  (1529  +  1290  ci  +  910  c3  +  918  c5) 

11319  +  1274  ci  +  7644  c2  +  7350  c3  -  780  c4  -  286  c5  +  4312  c6 

28  (418  +  299  ci  +  106  c3  +  225  c5) 

17681 

-7  (-1529  +  910  ci  +  918  c3  -  1290  c5) 

11319  +  1274  ci  -  7644  c2  +  7350  c3  +  780  c4  -  286  c5  -  4312  c6 

0 


198 


